救命哪！！！！！救命哪！！！！！救命哪！！！！！救命哪！！！！！救命哪！！！！！救命哪！！！！！救命哪！！！！！

Question

在一个窗体下我点了确定之后如果要调用另一个EDIT控件的onkeydown事件咋处理。如果是EDIT控件的onclick事件就好处理在确定的代码中写入edit1.click就可以了但是onkeydown不知道咋调用请高手指点！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！

Answer 1

var
  Form1: TForm1;
  D: Word= 13;
  Shift: TShiftState;
implementation{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1KeyDown(Sender, D, shift);  //传递一样的参数就ok拉 
end;procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key=13 then
ShowMessage('pppp');
end;

Answer 2

在另一个窗体或公用单元公布一个公用方法。你说的editonkeydown里调用该方法，在需要的其他时候直接调用该方法即可

Answer 3

mei si a!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!