mdi窗体的问题?(20分)

  • 主题发起人 主题发起人 tanmingyl
  • 开始时间 开始时间
我用的是delphi7.0
mail:
bikelittle@yahoo.com.cn
 
把代码放在keypress过程中
procedure TF_zc.Edit_zcmKeyPress(Sender: TObject; var Key: Char);
begin
if key =#13 then
key:=#0;
end;
 
procedure TForm3.LabeledEdit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
showmessage('ok');

end;
还是没有反应啊??
 
各位大侠伸出授助之手吧
 
多人接受答案了。
 
后退
顶部