mmh ich habe trotzdem wenn ich es starte und dann es spielen will derbe fehler im Projekt1 kommt er nicht weiter!
Bei aplication run steht nach dem Fehlerfenster wenn ich das programm starten will so nen Pfeil? Wieso?
Code:
program Project1;
uses
Forms,
SysUtils,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2},
Unit3 in 'Unit3.pas' {Form3};
{$R *.res}
begin
try
Application.Initialize;
Form2 := TForm2.Create( nil );
Form2.Show;
Form2.Repaint;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm3, Form3);
Application.Run;
finally
if ( Form2 <> nil ) then
FreeAndNil( Form2 )
end
end.