你写的代码不对吧?
FUNCTION Tform1.GETDETE(S:STRING):STRING;
BEGIN
EDIT1.TEXT:=S;
RESULT:=S+EDIT1.TEXT;
//那么D就是返回值;
END
tform1为窗体类,否则edit1无法调用.
当然在事件中调用还是用直接调用函数。
FUNCTION Tform1.GETDETE(S:STRING):STRING;
BEGIN
EDIT1.TEXT:=S;
RESULT:=S+EDIT1.TEXT;
//那么D就是返回值;
END
tform1为窗体类,否则edit1无法调用.
当然在事件中调用还是用直接调用函数。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货