掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
DLL作成について (ID：33355)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
当方も初級者。一応動くようだが。 procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin i := FindWindow(PChar('Notepad'), nil); if i = 0 then exit; i := Findwindowex(i, 0, 'Edit', nil); SendMessage(i, WM_SetText, 0, LParam(PChar('ABC'))); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.