Delphi-Quellcode:
Procedure TCalculationFrame.CalcButtonAltClick(Sender: TObject);
begin
<bla bla>
HauptF.ShowFrame5(self);
HauptF.PageControl1.ActivePageIndex := 0
end;
CalculationFrame "klebt" auf TabSheet1, Frame5 auf TabSheet5.
Der CalcButton befindet sich auf CalculationFrame. Die Änderung durch ShowFrame5 betrifft dann Frame5.
Delphi-Quellcode:
Procedure THauptF.ShowFrame5(Sender: TObject);
Begin
Frame5.FormCreate(Sender);
StatusHistory;
Frame5.Show;
End;