方法1:将自定义过程procedure Test(str: String);放到private后,程序中定义如下:TForm.procedure Test(str: String);
方法2:在 var Form1: TForm1;后定义的,写法如下:FormName.ButtonName.Caption:='';
方法2:在 var Form1: TForm1;后定义的,写法如下:FormName.ButtonName.Caption:='';
解决方案 »
- Delphi TlistBox 控件怎么一直从控件顶端增加新内容
- 局域网聊天..客户端之间的通信出现了十分让人郁闷的问题..
- 修改内存地址寄存器的值
- 请问哪里有 installshield express for delphi 下载!!!
- 如何锁定键盘只能输入特定的字符!~~~
- 怎样得到LISTVIEW中某个SUBITEM?
- 急,急如何编写.vxd文件屏蔽键盘和F4,F5,F8键
- delphi 5自带的那些例子……
- 小问题?(刚过完节,大家节日快乐!)
- 怎样把一个ADO的数据库程序打包.我用的是DELPHI自带的打包程序.送100分!!!
- 急救, 如何用ADO存取ACCESS中的‘OLE对象’字段的数据 ??? 在线等待!!!
- delphi 做好的数据库应用程序安装后无法使用,请高手指教,不胜感激
你可以把本过程放到form的声明中就不用在button.Caption前加Form了
begin
Button1.Caption:=str;
end;
//其他地方调用Test('hello')
没问题呀
begin
Button.Caption:=str;
end;
同意楼上的意见!!
方法1:将自定义过程procedure Test(str: String);放到private后,程序中定义如下:TForm.procedure Test(str: String);
procedure Test(str: String);
begin
Form.Button.Caption:=str;
end;把鼠标放在Test上,看看提示和窗体类成员的提示有何不同?知道为什么要这样做了?