delphi 如何打开记事本并显示指定内容

本文整理自网络，侵删。

 procedure TForm1.Button1Click(Sender: TObject);
var
hEdit: HWND;
str: string;
begin
str := '准备要添加到记事本的字符串';
WinExec('Notepad.exe', SW_SHOWNORMAL);
hEdit := GetWindow(GetForegroundWindow, GW_CHILD);
SendTextMessage(hEdit, WM_SETTEXT, 0, str);
end; 

相关阅读 >>

Delphi xe5 android 调用 google zxing

Delphi 我的电脑连接到 internet 了吗？

Delphi 串口控制继电器

Delphi 内存池

Delphi -- gdi+ Delphi如何让 tgpimage 直接从流中加载图片

Delphi中通过tclientsocket获取公网(wan)ip地址

Delphi 跳出循环的几种方法

Delphi qq表情的实现

Delphi编程实现sql server挂起清除

Delphi中使用xmlhttp / xmlhttprequest 避免缓存

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 如何打开记事本并显示指定内容