Problem med TMDI

prøv at fjerne T'et fra mdi

så siger den bare at der er fejl i mdi

Er der ingen som kan finde fejlen?????

Jeg er desperat. Jeg har lavet et rigmeligt stort program og er ved at være færdig, og så sker dette!!

Jeg svarede på dit oprindelige spørgsmål http://www.eksperten.dk/spm/257556

Det er ikke min kode der er noget galt med.
Det måden du kalder din mdi child form på.
du må nok hoste op med lidt mere kode for at folk skal have en chance
for at hjælpe dig.

Stoney

Hvad kode skal du bryge til at finde fejlen.?

eksempelvis hvordan du kalder din mdiform og hvordan dine componenter
på mdi former er lavet.

Stoney

Jeg har en mainform:

unit Unit1;

interface

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

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

var
  Form1: TForm1;

implementation

procedure TForm1.CreateMDIChild(const Name: string);
var
  Child: TMDI;
begin
  Child := TMDI.Create(Application);
  Child.Caption := Name;
end;
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
CreateMDIChild('Ikke navngivet');
end;

end.

Og så har jeg den form (form3) jag gerne vil have nogle funktioner på:

unit Unit3;

interface

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

type
  TForm3 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form3: TForm3;

implementation

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject);
begin
//Funktion
end;

end.

Og så har jeg jo selvfølgelig childen. Hvis jeg på mainformen vil lave en copy knap ska den se sådan her ud:

TMDI(ActiveMDIChild).Memo1.CopyToClipBoard;

Men det virker ikke på min form3. Der kommer den med den fjl som er øverst her på siden.

Håber det kunne hjælpe.

Er du der???

lukker