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;