[Byy]

Здравствуйте, помогите пожалуйста.
Есть фаил f.txt в нем записано некоторое вещественное число. Необходимо его вывести в Edit.

[Ultras]

Код:

var
  list: TStringList;
begin
  list := TStringList.Create;
  list.LoadFromFile('f.txt');
  Edit1.Text := list[0];
  list.Free;
end;

или так:

Код:

var
  myFile: TextFile;
  text: string;
begin
  AssignFile(myFile, 'f.txt');
  Reset(myFile);

  while not Eof(myFile) do
  begin
    ReadLn(myFile, text);
  end;
  CloseFile(myFile);

  Edit1.Text := text;
end;

P.S.: почитай это

[Byy]

спасибо буду пробовать

[Byy]

пробовал почитать "это" не понял. Я химик мне нужна программа расчета результатов анализа, сижу пишу. Спасибо за помощь.

[Ultras]

ну мои примеры думаю вам подойдут, особенно второй

[Byy]

Возник еще один вопрос. Программа компилируется до строки:
Edit1.Text:=text; дальше пишет:
[Error] : Undeclared identifier: 'Edit1'