안냐세요....(__)
폼에다가 버튼을 올려놓구요 클릭하면 caption 값을 label 에 찍은후
focus를 form에다가 옮겨 놓구요. 엔터를 치면 그 값을 찍어보려고 하는데요
당최 focus가 꿈쩍을 안해요.

그러니깐 포커스가 한번가면 onKeyDown 이벤트에서 enter가 눌렸을때
제가 원하는 일을 하지 않고 enter 고유의 일을 합니다.

소스를 보여드리자면...

버튼 클릭 이벤트시,
procedure TForm1.Button10Click(Sender: TObject);

begin
      Label1.Caption := Label1.Caption + TButton(Sender).Caption;
      Form1.SetFocus;
end;

키 다운 이벤트시,
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
         if key = 13 then
            testpro();
end;

머 이런식으로 하고 싶거든요.
포커스가 버튼에 안가있는 처음 상태에서는 함수 호출이 일어나는데
마우스 클릭을 하고 enter를 치면 엔터고유의 일을 해서 그 버튼 값을 계속 label에다가 더해서 뿌립니다....

어떻게 하면 제가 원하는데로 enter를 조절 할 수 있나요...

언제나 허접스런...델초가....