假设窗体启动的时候 如果加载的东西多了 那么就要写很多吗??
VB 就很简单咯 直接call到子程序中就可以调用了求delphi代码 应该怎么写呢?Private Sub Command1_Click()
call ceshi
End SubPrivate Sub ceshi()
msgbox "测试而已"
End Sub
VB 就很简单咯 直接call到子程序中就可以调用了求delphi代码 应该怎么写呢?Private Sub Command1_Click()
call ceshi
End SubPrivate Sub ceshi()
msgbox "测试而已"
End Sub
解决方案 »
- 看到我 别打我 还是个老问题 关于delphi SWF SDK
- 什么控件可以同时编辑文字和图片?
- 开发过控制短信终端(siemens TC35)发送短信的进(或使用过SPCOMM的)
- 存储过程错误“[microsoft][odbc sql server drivers] 没有执行可选特性
- 为什么我的服务程序不能随系统启动而启动?
- linux_chen到这里来拿分!!谢谢了,我还要麻烦你哟!呵呵
- 微软的一道面试题,很有意思,推荐
- 在一个字符串中有中文也有英文,如何将中文字分辨出来??
- 怎样用delphi写一个用ini 数据库配置信息
- FileWrite的问题
- 如何读取网络数据包(数量)!
- delphi钩子函数该怎么写,一定要写在dll中吗
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}
procedure ceshi;
begin
showmessage('測試!');
end;procedure TForm1.Button1Click(Sender: TObject);
begin
ceshi;
end;end.
delphi更简单,没有关键词call,直接写过程/函数名ceshi;