Hi,
Eine Variante:
OnCanClose vom PageControl...
Delphi-Quellcode:
procedure TDemo_Form.PCCanClose(Sender: TObject; var ACanClose: Boolean);
Var
APage: TcxTabSheet;
begin
APage := (Sender as TcxPageControl).ActivePage;
if APage.ControlCount > 0 then
if (APage.Controls[0] is TForm) then
(APage.Controls[0] as TForm).Close;
end;
Frank