Thema: Delphi tabset mdichild zuordnen

Einzelnen Beitrag anzeigen

ch33seburger

Registriert seit: 23. Nov 2003
31 Beiträge
 
#1

tabset mdichild zuordnen

  Alt 17. Jul 2005, 18:09
hi

ich hätte gerne ein tabset, das immer einen tab erzeugt, wenn ich ein mdichild erzeuge, und wenn das mdichild geschlossen wird soll auch der tab wieder verschwinden :/ aber ich bekomms nicht hin das der richtige tab geschlossen wird..

gibts eine möglichkeit, dem erzeugten tab das fenster zuzuweisen oder so?

jetz hab ich folgende methode probiert, aber das klappt nicht weil immer wenn ich ein tab lösche wird ja der index wieder zurückgestuft

Delphi-Quellcode:
procedure TForm3.FormClose(Sender: TObject; var Action: TCloseAction);
var
i: integer;
s: string;
foo: Tform;
begin
if Form1.MDiChildCount > 0 then begin
foo := (Form1.ActiveMDIChild As Tform);
if foo <> nil then begin
s:=foo.name;
s:=copy(s,6,length(s)); // ich hab extra den mdichilds den namen child+(die anzahl der childs) gegeben
if form1.TabSet1.Tabs.count<strtoint(s) then begin
form1.TabSet1.Tabs.Delete(0);
end else begin
form1.TabSet1.Tabs.Delete(strtoint(s));
end;
end;
end;
  Mit Zitat antworten Zitat