Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi problem mit hauptformular und nebenformular (https://www.delphipraxis.net/145749-problem-mit-hauptformular-und-nebenformular.html)

karoglan 7. Jan 2010 18:45


problem mit hauptformular und nebenformular
 
sagen wir mal ich hab zwei formulareI(form1=HF, form2=NF)
z.b binde ich einen timer im HF, diese soll im ontimer form2 anzeigen
nun will ich form1 "schließen" und form2 soll trotzdem angezeigt werden:
ich habs mit:
im form 2
Delphi-Quellcode:
form1.hide
bzw. im form1 mit form2.showmodal gemacht aber bie mir kommt nur eine exception fehler XXXXX...
ich habs jetzt mit
Delphi-Quellcode:
form1.destroy
gemacht und es geht--meine frage wäre:darf ich das überhaupt machen?


mfg

Delphi-Narr 7. Jan 2010 20:54

Re: problem mit hauptformular und nebenformular
 
Wie wäre es, wenn du den Timer dann deaktivierst.
Kann eine Prozedur in einem versteckten Formular laufen?

Also OnTimer:

Timer.enabled:=False;
Form2.show;
Form1.hide;

Und wenn das wieder aktiviert werden soll, wenn man die Form1 wieder zeigt ein OnShow-Ereignis einbauen.

Timer.enabled:=True;


LG

Micha88 7. Jan 2010 22:28

Re: problem mit hauptformular und nebenformular
 
Das hört sich ein bischen nach einem Schadprogramm an =)

Aber: Wofür ein Timer, wenn man doch nur zwei Fenster hat und das eine ein -und das andere ausblenden möchte?

karoglan 8. Jan 2010 21:53

Re: problem mit hauptformular und nebenformular
 
natürlich hab ichs mit timer.enabeld:=false gemcht geht aber nicht


nein nein kein schadprogramm
ich will nur so ein einleitungsfenster wie im adobe anzeigen lassen




mfg

Micha88 9. Jan 2010 06:13

Re: problem mit hauptformular und nebenformular
 
Sehr einfach, hier eine Lösung mit Timer:

Timer1: Enabled False, 1000ms
Im InCreate des Hauptformulars:
Delphi-Quellcode:
Timer1.Enabled := True;
Im Timer einfach:
Delphi-Quellcode:
var i: ShortInt;
begin
 inc(i);
 if i = 3 then
 begin
  Timer1.Enabled := False;
  Self.Hide;
  ZweitesFormular.Show;
 end;
end;
Sehr stupide Lösung, aber es geht.

karoglan 9. Jan 2010 09:33

Re: problem mit hauptformular und nebenformular
 
so gehts wirklich


danke


mfg

blawen 9. Jan 2010 10:05

Re: problem mit hauptformular und nebenformular
 
Zitat:

Zitat von karoglan
nein nein kein schadprogramm
ich will nur so ein einleitungsfenster wie im adobe anzeigen lassen

Ein Splashscreen würde ich aber ein wenig anders lösen.
Schau doch mal in die Online Referenz hier in der DP, da hat es m.M.n. bessere Ansätze.


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:54 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz