Form dynamisch createn...

[Cylence]

Hi,

ich hab ein recht grosses Prog und davon werden nicht alle forms immer verwendet darum mach ich das einfach so:

if not Assigned(FORM) then Application.CreateForm(TFORM, FORM);
FORM.Show;


wobei FORM eben der name der jeweiligen form ist. also das geht auch aber eben irgendwie nur meistens...manchmal gehts nicht also ich starte das prog probiers aus, klappt starte es später nochmal probiers wieder und es geht nicht und ich hab ne zugriffsverletzung...kann doch nich sein... mach ich da was falsch??? Die Forms werden auch nicht mehr gefreet danach oder so also das kann auch nich das prob sein...

ebenfalls hab ich einen splashscreen und der wird nach dem alles crreated wurde etc geschlossen aber bei einem einzigen von 170 pcs geht das nich das splash fenster bleibt einfach da... machen manche pcs manchmal einfach nich was sie sollen? zufallsprinzip das mach ich das nich...???

[Sharky]

Hai Cylence,

nicht böse sein. Ich würde Dir gerne helfen.... Aber ich verstehe deine Sätze einfach nicht.

Eventuell solltest Du dein Posting noch einmal editieren. ;-)

[Cylence]

häh?

naja ich mach auf einen button klick

if not assigned then application createform usw...
dann show form

aber manchmal gehts und manchmal nicht...

[mkinzler]

Ich würde eher

Zitat:

if not Assigned(FORM) then form := TForm.Create( Nil);

verwenden

[RavenIV]

Liegt möglicherweise am
Application.CreateForm.

Ich mache das meistens so:

Delphi-Quellcode:

  if not Assigned(Formname) then
  begin
    Formname.Create(Self);
  end;

Für das Splash-Problem:
Neue Frage, neuer Thread.
Pro Thread nur eine Frage, weil's sonst unübersichtlich wird.
Zudem kam das erst mit dem Edit dazu...

[Cylence]

ok also versuch ich das jetzt mal überall so zu machen, auch wenn ich den utnerschied nicht verstehe...

naja und das mit dem splash screen hat ja auch was damit zu tun es ist eben so das manche rechner manchmal irgendwie manches einfach nich machen warum auch immer und das is ja bei dem create auch so...und ich verstehs nich ganz

[Cylence]

also so gehts ja garnich:

if not Assigned(FNetSend) then TFNetSend.Create(nil);


aber so klappts im mom

if not Assigned(FNetSend) then FNetSend := TFNetSend.Create(nil);

was ist denn der wirklich richtige weg wie sollte man es machen?

[mkinzler]

Ersteres geht schon, es wird nur nicht der Referenzvariable zugewiesen

[Cylence]

ok habs gesehen aber was ist denn der rictige weg? was is an apllication.createform falsch? bzw wieso gehts manchmal sehr eigenartig find ich entweder gehts oder nich aber mal ja mal nein kann doch nich sein

[mkinzler]

Application.CreateForm() ruft intern auch den konstruktor auf.