Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Formular öffnen (https://www.delphipraxis.net/78757-formular-oeffnen.html)

lorus 10. Okt 2006 17:46


Formular öffnen
 
Huhu zusammen,

ich hab jetzt eine ganze Zeit lang nicht mehr mit Delphi gearbeitet und wollte mal wieder was kleines basteln, scheitere aber wohl schon am simpelsten :D

Ich wollte im Hauptformular ein neues Formular (mit z.B. Buttons) öffnen.

Also mach ich Datei-->Neu-->Formular

nennen wir es mal Form2 :P

Und im Main Formular erstell ich einen Button mit einem OnClick Event.

Delphi-Quellcode:
 procedure TF_MainMenu.Button1Click(Sender: TObject);
begin
  Form2.Show;
end;
So hab ich das in Erinnerung nur leider meckert er, weil er das Form2 nicht kennt, da dieses wiederrum in unit2.pas definiert ist aber ich den button in unit1.pas programmieren will.

Was mache ich falsch? :)

Balu der Bär 10. Okt 2006 17:50

Re: Formular öffnen
 
Du musst Unit2 der uses Liste von Form1 hinzufügen.

litsa 10. Okt 2006 17:52

Re: Formular öffnen
 
..einfach unter uses unit2 einbinden

Delphi-Quellcode:
implementation

uses Unit2;

lorus 10. Okt 2006 18:05

Re: Formular öffnen
 
ohje so simpel ist das doch :D

das uses ins implementation .. klar :D

hatte es ins uses vom interface geschrieben *gg*


Vielen dank für die schnelle antwort :)

lorus 10. Okt 2006 18:19

Re: Formular öffnen
 
hmm gleich die nächste Frage:

Habe folgendes Event bei Main Formular hinzugefügt.

Delphi-Quellcode:
procedure TF_MainMenu.FormCreate(Sender: TObject);
begin
  Left := 0;
  Top := 0;
  Width := Screen.Width;
  Height := Screen.Height;
  I_Background.Width := Width;
  I_Background.Height := Height;
  F_MainMenu.Enabled := False;
  Form2.Show;
end;
Das soll bewirken, dass das MainForm im 'Vollbildmodus' ist.

Ohne den Aufruf von Form2 funktioniert das auch Tatellos.

Aber durch das aufrufen von form2 bekomm ich jetzt beim Compilieren den Fehler

"Zugriffsverletzung bei Adresse 0044C20A in Modul 'Project1.exe'. Lesen von Adresse 000002F4"

Maja Jessica 10. Okt 2006 18:21

Re: Formular öffnen
 
Hi,

eventuell weil du etwas verändern möchtest was noch gar nicht vorhanden (created)?
Versuche mal in "OnShow"

.. Nachtrag:
(Wieder rausgenommen wegen noch grösserem Blödsinn, sorry) :oops:
MJ

mr-unbekannt 10. Okt 2006 18:24

Re: Formular öffnen
 
hallo!

kann es sein, dass die variablen I_background und f_mainmenue in der unit 2 vorkommen?
dann musst du schreiben form2.i_background

vielleicht wars dass

lorus 10. Okt 2006 18:32

Re: Formular öffnen
 
nein ist ein Image, dass sich auf dem HauptForm befindet.

edit: achja der borderstyle beim hauptform steht auf bsnone damit es die taskleiste überdeckt

litsa 10. Okt 2006 18:35

Re: Formular öffnen
 
Warum setzt du nicht die Eigenschaften WindowState des MainForm auf wsMaximize und Align des Images auf alClient?

Maja Jessica 10. Okt 2006 18:42

Re: Formular öffnen
 
Hi,

abgesehen davon, daß die Vorgehensweise mit dem Image nicht optimal ist, ging es nicht darum, das es beim Aufruf von Form2.Show kracht :gruebel:

Also rausnehmen un in "TF_MainMenu.FormShow" einbauen und gut ist. Oder verstehe ich jetzt wieder was falsch? :|

MJ

lorus 10. Okt 2006 18:43

Re: Formular öffnen
 
danke für den Tip:

hat aber leider den selben Effekt.

mit
Delphi-Quellcode:
procedure TF_MainMenu.FormCreate(Sender: TObject);
begin
  Form2.Show;
end;
---> Selber Error

Ohne Form2.Show --> kein ERROR

Maja Jessica 10. Okt 2006 18:48

Re: Formular öffnen
 
Mein Reden:

Error:
Delphi-Quellcode:
procedure TF_MainMenu.FormCreate(Sender: TObject);
begin
  Form2.Show;
end;
NoError:
Delphi-Quellcode:
procedure TF_MainMenu.FormShow(Sender: TObject);
begin
  Form2.Show;
end;

MJ

lorus 10. Okt 2006 18:50

Re: Formular öffnen
 
stimmt der Error ist schonmal weg *gg*

aber das Form geht nicht auf :D bzw wahrscheinlich nicht sichtbar

edit: hab auch versucht den Borderstyle und WindowState wie beim main form zu machen, aber selber effekt, nur das main form zu sehen

Maja Jessica 10. Okt 2006 19:03

Re: Formular öffnen
 
Hi,

du könntest die Eigenschaft von Form2 auf "FormStyle := fsStayOnTop" setzen.
(seltsam, warum funktioniert "BringToFront" nicht wirklich :gruebel: )

MJ

lorus 10. Okt 2006 19:21

Re: Formular öffnen
 
bringtofront?

naja egal, das hat auf jedenfall schonmal geklappt und das form ist im vordergrund :)

nur leider ist das geöffnete form nun nicht das aktive :)

wie kann man das noch ändern? :)

lorus 10. Okt 2006 21:51

Re: Formular öffnen
 
habs jetzt mal mit
Delphi-Quellcode:
procedure TForm2.FormActivate(Sender: TObject);
begin
  ActiveControl := Form2;
end;
versucht, aber da bekomme ich den selben Fehler wie vorhin, auch wenn ichs ins OnShow mache ... :-(


Hat sonst noch jemand eine Idee wie ich den Fokus auf das Form bekomme? :-/

uwewo 11. Okt 2006 06:25

Re: Formular öffnen
 
Prüfe als erstes im Pulldownmenü unter Projekt -> Optionen welches Formular als Hauptformular eingetragen ist, sollte TF_MainMenu sein.

Der aufruf von Form2
Delphi-Quellcode:
procedure TF_MainMenu.FormShow(Sender: TObject);
begin
  Form2.Show;
end;
ist absolut ok, und sollte das Formular auch automatisch in den Vordergrund bringen.

Deshalb stelle alle Eigenschaften im OI von Form2 wieder auf Standard ein.

Der Aufruf von Form2 könnte auch wie folgt sein, allerdings wird die Steuerung an die Anwendung erst wieder zuückgegeben wenn Du Form2 schließt.
Delphi-Quellcode:
procedure TF_MainMenu.FormShow(Sender: TObject);
begin
  Form2.ShowModal;
end;
Wenn das nicht funktionieren sollte, wäre es gut, wenn Du Teile des Quellcodes veröffentlichen würdest um vermeintliche Fehler zu entdecken.

Uwe

vlees91 11. Okt 2006 07:28

Re: Formular öffnen
 
Gibts vielleciht sowas als Form2.Focus := True; ?

Jürgen Thomas 11. Okt 2006 08:06

Re: Formular öffnen
 
Hallo lorus,

warum Forms2.Show zum "Krachen" geführt hat, möchte ich noch kurz genauer erläutern (das ist zwar bereits gelöst, aber die Erklärung fehlt mir dabei):

In der Projektdatei oder in den Projektoptionen steht, in welcher Reihenfolge die Formulare erstellt werden. Zuerst muss natürlich das Hauptformular kommen. (Das kann auch anders ablaufen - Stichwort SplashForm -, aber ich möchte es jetzt nicht zu kompliziert machen.) Delphi bzw. Application ruft also nacheinander folgende Methoden auf:
Delphi-Quellcode:
Form1.FormCreate() //  durch Application.CreateForm(TForm1, Form1);
Form2.FormCreate() //  durch Application.CreateForm(TForm2, Form2);
Form1.FormShow()   //  durch Application.Run;
Während Form1.Create() ist deshalb Form2 noch nicht erzeugt worden und kann deshalb noch nicht für Form2.Show benutzt werden; während Form1.FormShow() ist dies aber möglich.

Offen bleibt die Frage: Was willst Du mit Form2.Show; eigentlich erreichen?
  • Wenn beim Programmstart nicht Form1 im Vordergrund stehen soll, sondern Form2, dann ist das ein richtiges Vorgehen.
  • Auch geeignet dürfte (@vlees91) sein: Form2.SetFocus;
  • Wenn Du nur willst, dass Form2 zur Verfügung steht (der Normalfall), dann genügt Folgendes:
    • Setze Form2 im OI auf Visible := true.
    • Stelle sicher, dass (siehe oben) Form2 automatisch erzeugt wird.
    Dann kannst Du jederzeit - z.B. durch Form1.Button1Click - Form2.Show aufrufen.
Ich hoffe, ich habe zur Klarheit beigetragen. Gruß Jürgen

PS. Bitte nicht verwirren lassen: Weil ich jetzt fast ausschließlich mit C# arbeite, benutze ich auch solche Bezeichnungen. Oben stehen deshalb keine Delphi-Quelltexte, sondern nur Erläuterungen.

lorus 11. Okt 2006 16:06

Re: Formular öffnen
 
Zitat:

Zitat von Jürgen Thomas
Offen bleibt die Frage: Was willst Du mit Form2.Show; eigentlich erreichen?
  • Wenn beim Programmstart nicht Form1 im Vordergrund stehen soll, sondern Form2, dann ist das ein richtiges Vorgehen.
  • Auch geeignet dürfte (@vlees91) sein: Form2.SetFocus;
  • Wenn Du nur willst, dass Form2 zur Verfügung steht (der Normalfall), dann genügt Folgendes:
    • Setze Form2 im OI auf Visible := true.
    • Stelle sicher, dass (siehe oben) Form2 automatisch erzeugt wird.
    Dann kannst Du jederzeit - z.B. durch Form1.Button1Click - Form2.Show aufrufen.
Ich hoffe, ich habe zur Klarheit beigetragen. Gruß Jürgen

PS. Bitte nicht verwirren lassen: Weil ich jetzt fast ausschließlich mit C# arbeite, benutze ich auch solche Bezeichnungen. Oben stehen deshalb keine Delphi-Quelltexte, sondern nur Erläuterungen.

Genau das Form2 soll im Vordergrund vor Form1 stehen, denn es ist so gedacht, dass das Form1 nur das Hintergrundbild beinhaltet und einen Vollbildmodus erzeugt. Der Eigentlich Programmablauf soll erst mit dem Form2 beginnen.

Danke für die Hilfe, ich hab die Events jetzt komplett rausgelesen und das Form2 auf Visible gesetzt und nun funktioniert es, wie ich es wollte :)

Da hab ich wohl doch zu kompliziert gedacht :)

Viele Dank für die Hilfe


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:00 Uhr.

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