![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
|
Сразу к делу:
Код:
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; |