Potřebuju poradit, zda by někdo nevěděl, jak obejít chybu při otevření souboru z disku. Když toto dám do nový aplikace(viz konec příspěvku), tak to normálně funguje. Ale v mém programu, kde to potřebuji, mi to hází divnou chybu. U toho reset(F) : Missing operator or semicolon. V programu používám posílání dat přes DDE a ještě kreslení grafu přes canvas. Používám Delphi 7. Mám podezření, že jaksi si delphi spletli reset. Moc do OOP nevidim, ale si myslim, že si myslej, že volám jinou proceduru se stejnym jménem. Hledal jsem v helpu, jestli bych to nemohl volat ještě přes nějakou tečkovou notaci, ale nic jsem tam nenašel. Otveřít přes rewrite to jde, i přes append. Načíst řádek to jde přes memo1.lines.loadfromfile ale to je pro mě zbytčná operace navíc a vypadalo by to divně.
Dik.
...
F: textfile;
radek: string;
...
procedure TForm1.Button1Click(Sender: TObject);
begin
AssignFile(F,'c:\a.txt');
reset(F);
readln(F,radek);
CloseFile(F);
end;