MDI child form ist nil!?
Hallo DP,
ich hab nen formular welches momentan den FormState fsNormal hat. Ich würde aber gerne ein MDI child draus machen! Natürlich geht das, aber ich habe dann folgendes Problem: im OnShow des Forms wird eine ibQuery auf einen TDataModule geöffnet die wiederum auf das form zugreifen muss. Bei fsNormal kein Problem - bei fsMDIChild ist das form = nil! :gruebel: Gibt es eine Art workaround oder so um das zu um gehen? Oder gibts ein Ereignis or ne message nach dem es erstellt wurde, also das form nicht mehr nil ist? Hoffe das war verständlich... :roll: Gottes Segen |
Re: MDI child form ist nil!?
Zitat:
Ich vermute mal das die Unit-Globale-Formular-Variable verwendest. Und die sollte man tunlichst vermeiden. Ist nur für die automatische Formularerstellung von Delphi relevant und sollte sonst ignoriert werden. |
Re: MDI child form ist nil!?
Zitat:
Jetzt noch nen Code-Beispiel: MDIForm -> Click auf Button soll MDIChild (form2) erzeugen... MDIChild -> OnCreate ruft DataModul.DoSomething auf welche auf form2 zugreift. geht aber nicht weil form2 nil ist.
Delphi-Quellcode:
unit MDIForm;
interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private-Deklarationen } public { Public-Deklarationen } end; var Form1: TForm1; implementation {$R *.dfm} uses MDIChild; procedure TForm1.Button1Click(Sender: TObject); begin Form2 := TForm2.Create(Self); end; end.
Delphi-Quellcode:
unit MDIChild;
interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type Tform2 = class(TForm) Label1: TLabel; procedure FormCreate(Sender: TObject); private { Private-Deklarationen } public { Public-Deklarationen } end; var form2: Tform2; implementation {$R *.dfm} uses DataModul; procedure Tform2.FormCreate(Sender: TObject); begin dataMod.DoSomething; end; end.
Delphi-Quellcode:
unit DataModul;
interface uses SysUtils, Classes; type TDataMod = class(TDataModule) private { Private-Deklarationen } public procedure DoSomething; { Public-Deklarationen } end; var DataMod: TDataMod; implementation {$R *.dfm} uses MDIChild; procedure TDataMod.DoSomething; begin //This doesn't work because form2 is nil form2.Label1.Caption := 'HUHU'; end; end. |
Re: MDI child form ist nil!?
Delphi-Quellcode:
An dieser Stelle rufst du TForm2.Create(Self) auf -> das erzeugt das neue Formular und das ruft auch das FormCreate-Ereignis auf und, und und, ...
Form2 := TForm2.Create(Self);
Die Zuweisung an "Form2" findet erst statt, *NACHDEM* das alles passiert ist und die wieder in TForm1.Button1Click bist. Workaround:
Delphi-Quellcode:
procedure Tform2.FormCreate(Sender: TObject);
begin Form2 := Self; dataMod.DoSomething; end; |
Re: MDI child form ist nil!?
Zitat:
Delphi-Quellcode:
absolut MDI-Untauglich, da du ja
form2.Label1.Caption := 'HUHU';
- entweder für jedes MDI-Fenster eine eigene Datamodul-Instanz erzeugst - oder über den MDI-Parent die Meldungen/Events verteilt werden |
Re: MDI child form ist nil!?
Ich finde es immer wieder faszinierend, mit welcher Konsequenz Threads mit offensichtlich ähnlicher Problematik ignoriert werden, die sogar noch auf der gleichen Seite (VCL/SWF/Controls) stehen!
Und da ich immer wieder gerne den Hailopai spiele, der anderen die Threads rauskramt... http://www.delphipraxis.net/internal...=395120#395120 |
Re: MDI child form ist nil!?
Danke erstmal an Flocke für den Workaround. Da das form auch nur einmal erzeugt werden soll ist dies die optimale Lösung.
Und auch an Bernhard für die Tipps. Mit MDI kenn ich mich eben noch garnicht aus. @Robert_G: Ich weis zwar nicht wer Hailopai ist aber ich suche vorher mit google oder auch im Board noch ähnlichen Themen. Dein Thema hat meinen grundlegen Problem nichts genützt. Gottes Segen |
Re: MDI child form ist nil!?
Zitat:
Es würde mich wirklich interessieren, was an dem Thread (welcher EXAKT dein Problem durchkaut) nicht nützlich für die hier geschilderte Problematik ist. |
Re: MDI child form ist nil!?
Zitat:
Zitat:
Zitat:
Typen die nur Sprüche oder Behauptungen loslassen bekommen bei mir kein Applaus... Ich wünsch dir dennoch Gottes Segen |
Re: MDI child form ist nil!?
Hi,
Du könntest ja an die TDataMod Methode einen Paramater vom Typ "TForm2" anfügen, dem Du im Konstruktor von TForm2 "Self" übergibst. So könnten auch "andere" TForm2 die TDataMod Methode verwenden. mfG mirage228 |
Re: MDI child form ist nil!?
Zitat:
Ich kann/konnte nur absolut nicht nachvollziehen dass du hier auf Antworten wartest, whärend du im anderen Thread eigentlich genügend Hinweise fandest. Zitat:
Zitat:
Zitat:
Zitat:
Aber diese Lösung fühlte sich irgendwie absolut nicht richtig an. ;) |
Re: MDI child form ist nil!?
Zitat:
Da ich an mehreren Sachen gleichzietig arbeite, kann ich ruhig im Forum was posten und warten, das gibt mir die Möglichkeit andreren Dingen nachzugehen. Zitat:
Aber was immer noch noch geklärt ist: Was ist das tragische an diesen globalen Form variablen? Seit einigen Jahren benutze ich die nun schon und es gab nie Probleme?!? :wink: Zitat:
Zitat:
Zitat:
Zitat:
Gottes Segen |
Re: MDI child form ist nil!?
Zitat:
Zitat:
Also Nachteil: Alle können immer und überall darauf herumpfuschen. Zitat:
|
Re: MDI child form ist nil!?
Zitat:
Zitat:
Zitat:
Wenn ich eine globale Variable nicht kenne - fummle ich daran rum???? Nein, sowas macht man doch nicht... :tz: Nicht persönlich nehmen oder so... Aber, hast ja recht, letztendlich kann ich mir genügend Szenarien vorstellen wo ich keine globalen Variablen benutzen würde. Zitat:
Gottes Segen |
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:12 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