Сразу к делу:
Код:
procedure EMNPGraph.LoadFromFile(const FileName: TFileName);
var
Stream : TStream;
Size : Integer;
Buffer: TBytes;
begin
Stream := TFileStream.Create(FileName, fmOpenRead or fmShareDenyWrite);
try
Size := Stream.Size - Stream.Position;
SetLength(Buffer, Size);
Stream.Read(Buffer, 0, Size);
// что дальше необходимо делать с Buffer чтобы извлечь из него информацию
finally
Stream.Free;
end;
end;
Файл, из которого считывается информация имеет следующий вид:
Код:
2453 131
2454 137
2455 111
2456 120
2457 127
2458 148
т.е. пачка пробелов + число + пачка пробелов + число
Как грамотно импортировать данные в два "безразмерных массива"?
Код:
X : array of longint;
Y : array of longint;