Question

想知道如何自定义一个delphi判断函数

我想自定义一个判断函数。

就和IF语句一个意思的,然后用来判断edit中的文本是否和一个变量的文本相同。
最后输出语句相等，或者不相等。

因为我刚学delphi，还不是很明白，请大牛赐教。

万望附上代码。！ 小弟语文不好，口述不清楚。！

Answer 1

用函数来操作控件不是太好,我建议还是幅给变量来对比
简单的敲下代码
function issame(value1,value2:string):boolean;
begin
result:=false;
if(value1 = value2)then
result:=true;
end;

调用的话就是
if(issame(edit1.txt,value2) = true)then
showmessage('相同');
else
showmessage('不相同');

自己编译下看看 纯手打 ide没测试

追问

我加了个变量后就能编译了
VAR
value3：string；
我还有一个疑问。
就是按钮事件中得IF语句是不是，edit1.text=value3然后函数就等于真，然后再用IF判断函数是否等于真？

追答

百度hi我吧,这里说不方便..