我想寫一個模塊但是我不知道它的格式要怎么寫是否在
unit Unit2;interface
procedure TForm1.FormClick(Sender: TObject); //是否在這邊用這個來定義事件.
implementationend.
大家能否給點提示或給一個事例.
unit Unit2;interface
procedure TForm1.FormClick(Sender: TObject); //是否在這邊用這個來定義事件.
implementationend.
大家能否給點提示或給一個事例.
解决方案 »
- 流的问题
- Delphi图书之我见(转贴)--学delphi该看什么书?
- 如何将一个listbox中的值,复制给另一个listbox,同时删除本次所复制的值?
- 我用的delphi的TTable连接dbf数据库,在没有delphi的环境下报错,请问这个控件需要delphi的那些库啊?
- 如何把主程序的当前路径传递给DLL中的窗体使用
- 用什么函數可以得到電腦的網卡編號和ip地址﹐我好著急﹗
- 大侠帮忙?
- 一个小问题:怎样把一个字符串赋给memorystream类型的变量?
- delphi 两日期相减,为何不能得出相差天数?(急)
- 字符串变量怎么拼接啊?
- 请看看我的方法正确么???
- 急问,关于类的用法!!!!
我在open那邊進入samples但是沒有看到啊
比如我想把這樣一個清空代碼放入模塊到底要怎樣寫才是最好的.//這是清空edit和commbobx的內容.
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
for i:=0 to form1.ComponentCount-1 do
begin
if form1.Components[i] is tedit then
(form1.Components[i] as tedit).Text:=''
else if form1.Components[i] is tcombobox then
(form1.Components[i] as tcombobox).Clear;
end;
end;