guten abend an die ganzen programmers hier...
ich hab folgendes problem, was ich schon seit 2std. nicht beseitigt kriege. nachdem ich die FileExists routine reingepackt hab, klappt nun nix mehr (compilieren).
es tritt folgende meldung auf
Delphi-Quellcode:
Statement expected, but
Procedure found
could
not compile used
unit in '
main.pas'
achja die variable sl: TStringList; hab ich als global deklariert
Delphi-Quellcode:
procedure Thaupt.generate_buttonClick(Sender: TObject);
begin
if not FileExists('Content.txt') then
begin
sl:=TStringList.Create;
try
sl.Add('Content.TXT wurde nicht gefunden!');
sl.Add('Datei neu erzeugt');
sl.SaveToFile('Content.TXT');
finally
sl.free;
memo1.clear;
memo1.Lines.LoadFromFile('Content.TXT');
end;
end;
könnte mir bitte jemand helfen????