请大家帮我解释一下...我很菜.刚刚开始学DELPHI.大家帮帮忙 ( 积分: 10 )

procedure TfrmPageControl.FormCreate(Sender: TObject);
{1:这是什么意思?事件产生时自动调用的函数对吗??Sender: TObject 又是什么意思}
begin //开始
with pgcDemo do //2:什么意思?
begin
HotTrack := True
//3:HotTrack是个什么属性???
TabPosition := tpBottom
//4:什么意思??
end;
end;

procedure TfrmPageControl.btnAddPageClick(Sender: TObject);
{5:明明取名为frmPageControl,为什么却变成了TfrmPageControl???}
var //声明
tmpTabSheet: TTabSheet
//6:什么意思???
begin
if pgcDemo.PageCount &gt
6 then //7:如果pgcDemo 页面大于6时,那么
Exit
//退出.8:Exit是个什么词???
tmpTabSheet := TTabSheet.Create(pgcDemo)
//9:什么意思??
tmpTabSheet.Caption := ' 页面' + IntToStr(pgcDemo.PageCount + 1);
{10:什么意思??}
tmpTabSheet.PageControl := pgcDemo
//11:什么意思??
end;

我刚刚开始学习DELPHI..很多地方不懂.也是头一次来大富翁论坛.也不太会玩这个论坛
希望得到大家的帮忙..给我说说..谢谢大家了````

procedure TfrmPageControl.FormCreate(Sender: TObject);
{1:这是什么意思?事件产生时自动调用的函数对吗??Sender: TObject 又是什么意思}
begin //开始
with pgcDemo do //2:什么意思?
begin
HotTrack := True
//3:HotTrack是个什么属性???
TabPosition := tpBottom
//4:什么意思??
end;
end;

procedure TfrmPageControl.btnAddPageClick(Sender: TObject);
{5:明明取名为frmPageControl,为什么却变成了TfrmPageControl???}
var //声明
tmpTabSheet: TTabSheet
//6:什么意思???
begin
if pgcDemo.PageCount &gt
6 then //7:如果pgcDemo 页面大于6时,那么
Exit
//退出.8:Exit是个什么词???
tmpTabSheet := TTabSheet.Create(pgcDemo)
//9:什么意思??
tmpTabSheet.Caption := ' 页面' + IntToStr(pgcDemo.PageCount + 1);
{10:什么意思??}
tmpTabSheet.PageControl := pgcDemo
//11:什么意思??
end;

我刚刚开始学习DELPHI..很多地方不懂.也是头一次来大富翁论坛.也不太会玩这个论坛
希望得到大家的帮忙..给我说说..谢谢大家了````

买本书看吧, 这么多...

1.FormCreate,窗口创建时的发生的事件
2. with pgcDemo do //2:什么意思?
begin
HotTrack := True
//3:HotTrack是个什么属性???
TabPosition := tpBottom
//4:什么意思??
end;
等同于
pgcDemo.HotTrack := True

pgcDemo.TabPosition := tpBottom

3和4是pgcDemo控伯的属性,具体什么用,自己去试试.
5.前面加T代表的是类
6.声明类变量
7.Exit是退出当前过程
8.创建一个新的TTabSheet,和第6相关
9.定义新创建的TTabSheet的标题
10.定义新创建的TTabSheet所属的PageControl
我的理解是这样

procedure TfrmPageControl.btnAddPageClick(Sender: TObject);
这里(Sender: TObject);是什么意思?为什么要加个括号
tmpTabSheet := TTabSheet.Create(pgcDemo)

//创建一个新的TTabSheet,和var tmpTabSheet: TTabSheet;相关
中的TTabSheet.Create(pgcDemo);
为什么pgcDemo 这里要加个括号..Create是个什么属性??
tmpTabSheet.PageControl := pgcDemo


PageControl 又是个什么属性..
这些属性该怎么用..
不好意思..我刚刚才开始学.可能问的问题有点荒唐..或者闹了笑话.

请不要见笑..谢谢..

天啊......真的不想答你
(Sender: TObject);表示 参数是 Sender 为 TObject 类型

天啊....看不下去了...不答了

呵呵..谢谢..
我问的问题是有点白痴了.

不要见笑..