Erro corrupdet
Boa tarde Pessoal
Preciso de um help estou passando meu projeto de delphi 5 para XE5, só que esta dando erro : System unit out of date or corrupted: missing '@assign', isso ocorre no meu código aqui rewrite(Arquivo, Porta);
Alguém já passou por isso ?
HELP!
Preciso de um help estou passando meu projeto de delphi 5 para XE5, só que esta dando erro : System unit out of date or corrupted: missing '@assign', isso ocorre no meu código aqui rewrite(Arquivo, Porta);
Alguém já passou por isso ?
HELP!
Fabianoluizdb
Curtidas 0
Respostas
Raphael Morsch
09/01/2015
Olá fldb...
Isso acontece pq o método Rewrite mudou de assinatura. Suportando apenas o parâmetro TextFile ou ainda um Parâmetro TextFile e um segundo parâmetro do tipo Integer (referente ao tamanho do arquivo).
Para que seu código passe a funcionar use o AssignFile e depois o Rewrite, ex.:
AssignFile(Arquivo, Porta);
Rewrite(Arquivo);
Espero que tenha sido útil.
Isso acontece pq o método Rewrite mudou de assinatura. Suportando apenas o parâmetro TextFile ou ainda um Parâmetro TextFile e um segundo parâmetro do tipo Integer (referente ao tamanho do arquivo).
Para que seu código passe a funcionar use o AssignFile e depois o Rewrite, ex.:
AssignFile(Arquivo, Porta);
Rewrite(Arquivo);
Espero que tenha sido útil.
GOSTEI 0
Thiago Santana
09/01/2015
Olá fldb...
Isso acontece pq o método Rewrite mudou de assinatura. Suportando apenas o parâmetro TextFile ou ainda um Parâmetro TextFile e um segundo parâmetro do tipo Integer (referente ao tamanho do arquivo).
Para que seu código passe a funcionar use o AssignFile e depois o Rewrite, ex.:
AssignFile(Arquivo, Porta);
Rewrite(Arquivo);
Espero que tenha sido útil.
Isso acontece pq o método Rewrite mudou de assinatura. Suportando apenas o parâmetro TextFile ou ainda um Parâmetro TextFile e um segundo parâmetro do tipo Integer (referente ao tamanho do arquivo).
Para que seu código passe a funcionar use o AssignFile e depois o Rewrite, ex.:
AssignFile(Arquivo, Porta);
Rewrite(Arquivo);
Espero que tenha sido útil.
Exatamente isso que o Raphael postou!
GOSTEI 0