原创 Delphi編寫IE標題 首頁設置軟件 TRegistry註冊表類
不盡人意,希望看到的大大幫我改正。 var reg,reg1:TRegistry; title,url:string; function SetReg():Boolean; begin SetWindowLong(Form
原创 Delphi實現窗體總是向前操作,Delphi拖拽的一個例子
Delphi實現窗體總是向前操作 procedure TForm1.Button1Click(Sender: TObject); begin if form1.FormStyle=fsNormal then //默認操作
原创 獲取指定窗口句柄結束進程 OpenProcess FindWindow GetExitCodeprocess TerminateProcess
獲取指定窗口句柄結束進程 OpenProcess FindWindow GetExitCodeprocess TerminateProcess procedure TForm1.Button1Click(Sender: TObject);