NotePad に文字を表示するには？

解決

ライムライト 2009-11-19 18:02:21 No: 36203

過去ログからフォームにボタンを貼り付けて以下のように作ったのですが
NotePadを起動して実行しましたが。
フォーカスはあたっているようですが、
何も表示されませんでした。
どうしてでしょうか？
環境は WindowsVista delphi2007 です。

procedure TForm1.Button2Click(Sender: TObject);
var
  NOTEEDIT :HWND;
begin
  NOTEEDIT:=FindWindow('Notepad',nil);
  BringWindowToTop(NOTEEDIT);
  keybd_event(VK_CONTROL, 0, 0, 0);
  keybd_event(Ord('A'), 0, 0, 0);
  keybd_event(Ord('A'), 0, KEYEVENTF_KEYUP, 0);
  keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
end;

ライムライト 2009-11-19 22:16:47 No: 36204

すみません。
勘違いしてたみたいです。

keybd_event(Ord('A'), 0, 0, 0);
keybd_event(Ord('A'), 0, KEYEVENTF_KEYUP, 0);

これだけでよかったんですね。
おさわがせしました。