MDI Child zur laufzeit erzeugen ?

[Muetze1]

Moin!

Zitat:

Zitat von Pseudemys Nelsoni

hallo an alle und danke 8)

Zitat:

Hey, du hast das Wunder von Klassen entdeckt: einmal schreiben und x mal anlegen mit gleichem Verhalten, obwohl nur einmal Code geschrieben wurde. Die Klasse TChild legt aussehen und Verhalten fest - und das kannst du dir dann so oft anlegen bzw nutzen wie du willst.

eigentlich weiss ich schon wie klassen funktionieren, nur ich sehe in der TChild unit keine definition der postion der komponenten wo steht die?

Der Kommentar sollte auch eher scherzhaft sein - und ich muss dazu gestehen, das ich mir den Code nicht angeschaut habe. Das werde ich gleich nochmal nachholen...

/EDIT:

Ok, nachgeholt. In dem Quellcode sind doch wie auch in der DFM die Komponenten ordentlich angelegt:

Code:

type
  TChild = class(TForm)
    RadioButton1: TRadioButton;  // <-- ein RadioButton
    Button1: TButton;            // <-- ein Button
    Edit1: TEdit;                // <-- ein Edit
    ComboBox1: TComboBox;        // <-- eine ComboBox...
    procedure FormClose(Sender: TObject; var Action: TCloseAction);

  private
  public
  end;

MfG
Muetze1

[Pseudemys Nelsoni]

danke mütze, die DFM datei hab ich mir garnicht angeguckt :oops:

normal hab ich sowas immer in der .pas datei und setze die position zur laufzeit :)

[Muetze1]

Moin!

Zitat:

Zitat von Pseudemys Nelsoni

normal hab ich sowas immer in der .pas datei und setze die position zur laufzeit :)

Wie geschrieben: in der .PAS Datei sind die Komponenten auch vorhanden. Oben der von mir gepostete Source Code ist doch der Ausschnitt der PAS Datei mit der Deklaration der Komponenten...

MfG
Muetze1