Новый вопрос №82940

Четверг, 01 Января 1970 г. 03:00 + в цитатник

Delphi 7. Хотел сделать так

code:var
  Stream: TFileStream;
begin
  Stream:=TFileStream.Create('c:\Temp\MyFile.dat',fmCreate);
  Stream.Size := 5000*1024*1024;
  Stream.Free;
  Self.Close;
end;

На этапе компиляции получаю ошибку Overflow in conversion or arithmetic operation [EM]Stream.Size[/EM] имеет тип [EM]Int64[/EM]. Думал, что не будет переполнения... Выкрутился так [Code]var Stream: TFileStream; MySize: Int64; begin MySize := 1; MySize := MySize * 500 ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=82940