看不懂的东东.

[m456]

implementation

uses Unit2, Unit3;

var
a:TFrame2;
b:TFrame3;//这个是什么类呀.
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
if assigned(a) then a.Free
//请问ASSIGNED各A.FREE是什么意思,
else
if assigned(b) then b.Free;
b:=TFrame3.Create(self);
TFRAME是什么类呀,SELF是不是正常现视的意思呀?
b.Parent:=Panel1;
//PARENT和PANEL1是什么意思
b.Align:=alClient;
//ALIGN和ALCLIENT也不明白.
b.Show;
end;

[zaza_bbface]

快笑死我了...楼主你真幽默

[老之]

居然一点都看不懂，我彻底吐血！！
楼下的知道为什么吗？






































因为这个是我写好发给楼主的例子! @_@

[Rex_love_Burger]

无语！

[ZyxIp]

楼主好好看看基础吧!

你总不能在学英语的时候让别人替你学ABC吧.

下本OBJECT PASCAL 电子版本看看.知道什么是变量,什么是类,什么是对象.

[小呆之家]

呵~~,吐血!!!
这家伙,发贴要人命啊.......

[hellolongbin]

呵呵，看注释比看代码好玩多了

[hsmserver]

这样的注释也很经典