private
fint:integer;procedure testproc(value:integer);
begin
fint:=value;
end;
button click;
begin
testproc;
end;
delphi报错要赋参数
但如果
pulished
property myint integer read fint write testproc;
编译通过.
请问是什么原因.
fint:integer;procedure testproc(value:integer);
begin
fint:=value;
end;
button click;
begin
testproc;
end;
delphi报错要赋参数
但如果
pulished
property myint integer read fint write testproc;
编译通过.
请问是什么原因.
解决方案 »
- 窗体显示时有些控件不显示怎么办?50分啊
- sql 语句如何防止语句出错
- FastReport报表中如何取得用户在当前窗体(如ReportForm)的TEdit中输入的内容?
- 页框控件(pagecontrol)的标签在左边时,标签上的文字要怎样才能设成垂直由上到下排?
- 我是菜鸟,谁能告诉我Ado控件的使用方法????
- 如何将access数据表倒出成txt的格式,然后再恢复?
- 关于XMLMapper
- 如何使鼠标的移动按照我定义的步长移动,比如一次移动5个像素点。
- 请问.REGISTRY中怎样建立一个双字节值
- csdn是这样的吗?
- 如何做断点续传的下载功能? 最好能有个实例
- 《delphi 4编程技术内幕》
不是类的过程,改为Tfrom1.testproc(value:integer)即可
protected
published
public
var i:integer;
begin
i:=88;
testproc(i);
end;
这是正确的.
pulished
property myint integer read fint write testproc;
问题是一个要testproc(i)一个是testproc;为什么
说详细点好吗
testproc(i),他是一个语句,必须有函数名和参数!
而在定义属性的时候,testproc只是一个地址,既当写属性的时候,就去读这个地址!