我编了一只工程,这工程(.dpr)文件里有两只FORM,名字分别为FORM1,FORM2在FORM2的ONKEYUP里写了根据不同按鍵做不同功能的代码FORM1呢USES了FORM2我想在FORM1的ONKEYUP时调用FORM2的ONKEYUP事件我这样来写了form1.onkeyup 代码如下了
var
tempkey:word;begin
tempkey:=key;
form2.onkeyup(nil,tempkey,[])
end; 上面代码的意思就是把按FORM1的鍵值传到form2里了,并且执行FORM2里相应的程序段但根本不执行form2的onkeyup
为何会这样呢,哪里错了
var
tempkey:word;begin
tempkey:=key;
form2.onkeyup(nil,tempkey,[])
end; 上面代码的意思就是把按FORM1的鍵值传到form2里了,并且执行FORM2里相应的程序段但根本不执行form2的onkeyup
为何会这样呢,哪里错了
form2.onkeyup(form1,tempkey,[]);
试试看吧.
我只不过了是在FORM1里手工调用FORM2的ONKEYUP里
大家讨论讨论了
执行时出错了?
在FORM2中写一个过程,如procedure Form2.form1Keyup(key:word);
在Form1.onkeyup中,写一句: form2.form1keyup(key);
就可以了
form2.keyup(nil,tempkey,[])直接写上子程序的名字,不要加ON
我想直接从FORM1里调用FORM2的ONKEYUP事件但用
FORM2.ONKEYUP(NIL,TEMPKEY,[])运行的时候了执行了出错出错的信息好像了什么内存地址无效之类的我的窗口了是工程里AUTOCREATE的
tempkey:=key;
form2.onkeyup(nil,tempkey,[])
end; 我用了很好,一点没错?