Problem mit Procedure

[Die Muhkuh]

Delphi-Quellcode:

procedure Datei(cZeit: String);
begin


   IF (Form1.lText) Then Begin
     Application.CreateForm(TForm2, Form2);
     Form2.ShowModal();
     lText := False;
   end;

end;