|
ｿｽ@ｿｽｿｽTFrameｿｽｿｽgｿｽpｿｽｿｽｿｽｿｽﾉは？
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ 2009/06/23(ｿｽｿｽ) 16:10:49
TFrame ｿｽﾌ使ｿｽｿｽｿｽｿｽｿｽﾉつゑｿｽｿｽﾄの趣ｿｽｿｽｿｽﾈのでゑｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽAｿｽﾎ擾ｿｽｿｽﾅゑｿｽｿｽﾈゑｿｽｿｽﾌで具ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
TFrameｿｽｿｽｿｽｿｽhｿｽｿｽｿｽｿｽｿｽｿｽTMyFrameｿｽﾅｿｽｿｽjｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽtｿｽHｿｽ[ｿｽｿｽｿｽﾉゑｿｽPageControlｿｽｿｽzｿｽuｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽｿｽTabSheetｿｽｿｽTabSheetMyFrameｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
TabSheetMyFrameｿｽｿｽOnShowｿｽｿｽ
MyFrame := TMyFrame.Create(TabSheetMyFrame);
MyFrame.Parent := TabSheetMyFrame;
TabSheetMyFrameｿｽｿｽOnHideｿｽｿｽ
MyFrame.Free;
MyFrame := Nil;
ｿｽﾆ、ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
PageControlｿｽｿｽActivePageｿｽｿｽTabSheetMyFrameｿｽﾈ外ｿｽｿｽ
PageControl.ActivePage := TabSheetOther
ｿｽﾆゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽ
TabSheetMyFrameｿｽﾉ切ゑｿｽﾖゑｿｽｿｽｿｽﾆフｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌに、
Form.Create ｿｽｿｽ
PageControlｿｽｿｽActivePageｿｽｿｽTabSheetMyFrameｿｽｿｽ
PageControl.ActivePage := TabSheetMyFrame
ｿｽﾉゑｿｽｿｽｿｽﾆフｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾌはどゑｿｽｿｽｿｽｿｽﾄでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
KHE00221 2009/06/24(ｿｽｿｽ) 05:32:41
ｿｽ^ｿｽuｿｽｿｽﾘゑｿｽﾖゑｿｽｿｽｿｽﾆゑｿｽ ｿｽVｿｽｿｽｿｽｿｽｿｽ^ｿｽuｿｽｿｽ SHOW ｿｽｿｽｿｽﾌタｿｽuｿｽｿｽ HIDE ｿｽｿｽ
ｿｽｿｽｿｽsｿｽｿｽｿｽｿｽｿｽﾌゑｿｽ
TabSheetMyFrameｿｽｿｽOnShowｿｽｿｽ
MyFrame := TMyFrame.Create(TabSheetMyFrame);
MyFrame.Parent := TabSheetMyFrame;
TabSheetMyFrameｿｽｿｽOnHideｿｽｿｽ
MyFrame.Free;
MyFrame := Nil;
ｿｽｿｽｿｽﾆタｿｽuｿｽｿｽﾘゑｿｽﾖゑｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽﾉ擾ｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽだゑｿｽｿｽﾇ・ｿｽEｿｽE
ｿｽｿｽｿｽｿｽﾈ奇ｿｽｿｽｿｽｿｽﾉゑｿｽｿｽﾗゑｿｽｿｽｿｽｿｽﾆ？
procedure TForm7.TabSheetOnShow(Sender: TObject);
begin
Frame8.Parent := TTabSheet(Sender);
end;
procedure TForm7.FormCreate(Sender: TObject);
begin
Frame8 := TFrame8.Create(TTabSheet(Sender));
Frame8.Parent := PageControl1.ActivePage;
TabSheet1.OnShow := TabSheetOnShow;
TabSheet2.OnShow := TabSheetOnShow;
end;
ｿｽ皷 TabSheetOnShow ｿｽｿｽ
TabSheet(Sender).BringToFront;
ｿｽｿｽｿｽｿｽｿｽｿｽﾎ表ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉなゑｿｽﾆ思ｿｽｿｽｿｽｿｽｿｽｿｽ(ｿｽ^ｿｽuｿｽｿｽｿｽPｿｽﾂの場合ｿｽ¥ｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽ)
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ 2009/06/29(ｿｽｿｽ) 15:48:04
FormｿｽｿｽOnActiveｿｽｿｽFrameｿｽｿｽ¥ｿｽｿｽtｿｽｿｽｿｽｿｽ
FormｿｽｿｽOnDestroyｿｽｿｽFrmaeｿｽｿｽ除ｿｽｿｽｿｽｿｽﾎゑｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽﾋ。
