Combobox.Text an andere Unit übergeben

[DeddyH]

In der *.dpr wird wahrscheinlich zuerst Form1 erzeugt und dann Form2. Da Du den einen Code bereits im OnCreate von Form1 ausführst, ist zum Zeitpunkt der Erstellung von Form2 die Variable bereits befüllt. Anders verhält es sich bei allen späteren Ereignissen von Form2, da zu diesem Zeitpunkt Form2 ja bereits erzeugt wurde und somit dessen OnCreate niemals mehr duchlaufen wird (zumindest solange Du das Formular nicht neu erzeugst).

[bluerazer190]

Ahh, OK, jetzt habe ich den Fehler verstanden.
Lässt sich das Problem, auch irgendwie anders lösen?

Im Internet lese ich immer etwas von "FormStyle fsMDIParent" hast du diesbezüglich eine Idee?

Denn mit Formularen während der Laufzeit zu erstellen habe ich noch gar keine Erfahrungen.

MfG

[DeddyH]

Wie gesagt: der eleganteste Ansatz geht IMO über eine Propery. Dann besteht auch keine Notwendigkeit mehr, dass Form2 Form1 kennen muss. Beispiel:

Delphi-Quellcode:

type 
  TForm2 = class(TForm)
  ...
  private
    FStringProperty: string:
    FIntProperty: integer;
    ...
  public
    ...
    property StringProperty: string read FStringProperty write FStringProperty;
    property IntProperty: integer read FIntProperty write FIntProperty;
  end;

...

procedure TForm2.FormShow(Sender: TObject);
begin
  ShowMessage(Format('String: %s, Int: %d', [StringProperty, IntProperty]));
end;

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.StringProperty := 'Ach was?!';
  Form2.IntProperty := 42;
  Form2.Show;
end;

[bluerazer190]

Kannst du hiermit etwas anfangen?

Du gehst so vor:

Du bastelst zunächst ein Hauptformular, welches Dein Menü, etc., enthält. Dieses bekommt als FormStyle fsMDIParent (?, das ist jetzt aus dem Kopf).
Dann erzeugst Du noch ein zweites Formular, welches als FormStyle fsMDIChild bekommt. Dieses ist in den Projekt-Optionen auf die rechte Seite zu schieben, weil es dynamisch von Dir erzeugt wird.
Das MDI-Child braucht bei FormClose als Action caFree, weil es beim Schließen sonst nur minimiert werden würde.
Per Menüpunkt (z.B. "Neue Notiz") erzeugt Du eine Instanz des MDI-Childs (TfmChild.Create (Application)), welches Du dann mittels Show anzeigst.

[bluerazer190]

Also wenn ich so vorgehe, kann ich auf meine Variable zugreifen... mal sehen, wies weite geht.

Danke für deine hilfreichen und schnellen Antworten.

[DeddyH]

Sry, das MDI im letzten Posting hatte ich wohl überlesen. Aber gut, auch da ginge das mit Properties.

[bluerazer190]

Nächstes Problem. -.-

Habe das Form2 jetzt als MDIChild deklariert.

Wenn ich es mit TForm2.Create(self); in Unit 1 erstelle, öffnet es sich zwar, aber es ist aufeinmal viel größer als es desint wurde.

Woran könnte das liegen?

[bluerazer190]

Hallo Community,
ich will diesen Thread jetzt nicht so einfach unbeendet offen lassen, deswegen möchte ich einmal berichten, wie ich mein Problem lösen konnte.

Das Problem bestand ja darin, wie DeddyH bereits schön beschrieben hatte:

Zitat:

In der *.dpr wird wahrscheinlich zuerst Form1 erzeugt und dann Form2. Da Du den einen Code bereits im OnCreate von Form1 ausführst, ist zum Zeitpunkt der Erstellung von Form2 die Variable bereits befüllt. Anders verhält es sich bei allen späteren Ereignissen von Form2, da zu diesem Zeitpunkt Form2 ja bereits erzeugt wurde und somit dessen OnCreate niemals mehr duchlaufen wird (zumindest solange Du das Formular nicht neu erzeugst).

Nun Habe ich das Form2 beim Start des Programms nicht gleich mit erstellen lassen, indem ich unter Projects-->Options das Form2 in Available Forms geschoben habe.

Trotzdem nochmal ein dickes Danke an DeddyH für seine schnellen Antworten.