var put:string;
begin
put:=edit1.text;
assignFile(f1,put);
assignFile(f2,'c:\1.txt');
reset(f1);
rewrite(f2);
end;
procedure TForm1.Button1Click(Sender: TObject);
var С:char;
begin
read(f1,С);
edit1.text:=chr(С)
end;
End.
Мне требуется узнать ASCII код символа С,читаемого из файла F1,и вывести его в поле Edit1.
Delphi 7 выдает ошибку,ругается на строчку выделенную красным.
Подскажите как сделать?Я сам не местный раньше на VB все делал
