MDI oder ähnliches

[Erlkönig]

Heute morgen im Informatikunterricht(Klasse 12 GK) haben wir uns darüber unterhalten, wie man möglichst viele fenster auf einmal öffnet. Unser Lehrer gab uns dann den Tipp, dass man hierzu möglichst MDIChild benutzten sollte. Da ich mich damit nicht auskenne :wiejetzt: würde ich gerne Hilfe bekommen wie so etwas zu realisieren ist.
Mit Showmessage/MessageDLgPos haben wir es bereits probiert, allerdings wird hier die schleife solange pausiert, bist in dem betreffenden Fenster Ok o.ä. gedrückt wurde.

Ich hoffe auf hilfreiche Antworten. DANKE! :coder:

p.S: Wir benutzen Delphi 5 welches ich auch privat nutze.

[uligerhardt]

Bei Delphi ist eine MDI-Vorlage dabei. In den neueren Delphi-Versionen ist sie unter Datei -> Neu -> Weitere -> Delphi-Projekte -> MDI-Anwendung zu erreichen; das wird in D5 ähnlich sein. Probier die doch einfach mal aus.

HTH, Uli.

[Erlkönig]

erst mal danke. ich hab mich mal mit der anwendung beschäftigt und denn Quelltext insofern übernommen, was für mich von interesse ist. Will ich nun das Programm starten bekomme ich die Fehlermeldung:

[Fataler Fehler] Unit1.pas(24): Datei nicht gefunden: 'ChildWin.dcu'

...mhm...

Code:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
    procedure CreateMDIChild(const Name: string);
  public
    { Public declarations }
  end;

var
  Form1: TForm;

implementation

{$R *.DFM}

uses ChildWin, About;

procedure TMainForm.CreateMDIChild(const Name: string);
var
  Child: TMDIChild;
begin
  { create a new MDI child window }
  Child := TMDIChild.Create(Application);
  Child.Caption := Name;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
CreateMDIChild('NONAME' + IntToStr(MDIChildCount + 1));
end;

end.

Das ist mein Code den ich aus dem von Delphi vorgegebenen Beispiel genommen hab.

[s-off]

Ähm, das zeigt doch der Quelltext des genannten Beispielprojektes :!:

[Erlkönig]

EDIT siehe oben. s-off war schneller mit seinem beitrag als ich mit der editierung :coder: