brrr bin am verkalken ..
Ich habe eine Form angelegt welche nicht Automatisch erzeugt werden soll
aber die eigenschaften der in TFormMain abgelegten Eigenschaften erben soll.
Hier habe ich ein Array angelegt
frmMain: array [1..iTrails] of TfrmMain;
Die Form wird geladen
Delphi-Quellcode:
Application.Initialize;
Application.MainFormOnTaskbar := False;
Application.Run;
Main;
Delphi-Quellcode:
procedure Main;
var
IntI : Integer;
begin
GDI_Init;
for IntI := 1 to iTrails do
begin
frmMain[IntI] := TfrmMain.Create(nil);
frmMain[IntI].Show;
frmMain[IntI].LoadPng(IntI);
end;
end;
Mein Problem
Die Anwendung beendet einfach.
gruss