try this:
Procedure TTeacherForm.ShowData();
begin
....................
...................
end;procedure TTeacherForm.FormCreate(Sender: TObject);
begin
ShowData();
end;
Procedure TTeacherForm.ShowData();
begin
....................
...................
end;procedure TTeacherForm.FormCreate(Sender: TObject);
begin
ShowData();
end;
解决方案 »
- FASTRESPORT公式的问题,请帮忙解答
- 怎样将Tfontstyle里面的各项转换为字符串?
- 有没有<<delphi7开发人员指南>>这本书啊?D5 D6 我都能找到...
- 报表中如果显示出变量数据
- 哪里有Dbchart方面的文章,请介绍一下
- 请问手机MODEM是什么?用手机数据线与PC串口相连在PC上看手机短消息是否可以不需要那个MODEM?
- 怎样做一个应用程序的setup文件呢?
- 。。。。。。。。DELPHI组件开发遇到的难点。。。。。。。。。
- BO2K的源码,有人要吗?
- 我想说....................
- 在sql存储过程中,怎么循环访问表的每一条记录并修改?
- ADOdataset的locate为什么出错?
begin
....................
...................
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
ShowData();
end;
{ Public declarations }
Procedure ShowData;
end;
Procedure Tform1.ShowData;
begin
....................
...................
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
ShowData;
end;
begin
....................
...................
end;
procedure Form1.FormCreate(Sender: TObject);
begin
ShowData();
end;