如何实现这样的界面

Question

象windows 优化大师那样，左边是一排竖着的按钮，点按钮右边出现相应的内容
右侧也是from 但是融合在主窗口中

Answer 1

用MDI就行点击按纽时，就弹出子窗体

Answer 2

不是的吧，优化大师好像是一个个tabsheet吧

Answer 3

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ShellCtrls, ComCtrls, StdCtrls;type
  TForm1 = class(TForm)
    PageControl1: TPageControl;
    TabSheet1: TTabSheet;
    TabSheet2: TTabSheet;
    TabSheet3: TTabSheet;
    TabSheet4: TTabSheet;
    TabSheet5: TTabSheet;
    ListView1: TListView;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    procedure FormCreate(Sender: TObject);
    procedure ListView1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
i:integer;
implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
for i:=0 to PageControl1.PageCount-1 do
 ListView1.AddItem(PageControl1.Pages[i].Name,nil);
i:=0;
pagecontrol1.Pages[i].Visible :=true;
end;procedure TForm1.ListView1Click(Sender: TObject);
begin
pagecontrol1.Pages[i].Visible:=false;
i:=listview1.ItemIndex ;
PageControl1.Pages[listview1.ItemIndex].Visible:=true;
end;end.

Answer 4

并且：
TabSheet1--->TabSheet5 的tabvisible:=false;
就可以实现

Answer 5

用  listview  和PageControl

Answer 6

NoteBook,
NoteBook.ActivePage;='book';
NoteBook.ActivePage;='school';

Answer 7

windows 优化大师主程序用了flatstyle控件

Answer 8

使用 TFrame 就可实现你要的功能, 其实蛮简单的

Answer 9

Flatstyle控件
www.2ccc.com有下的!