剛剛看了很久~ 看到很多東東 如 下 HWND FindWindow( LPCTSTR lpClassName, // pointer to class name LPCTSTR lpWindowName // pointer to window name ); 我是新手~~很多東西不太明白~~大家不好見怪~.~ 請問上面的文字要在那放上才可使用? 可做一次給我看嗎/教我在那放上這文字才可用嗎~

您好： 請勿跨區Post.... 新手請參考下面站台規定。 http://delphi.ktop.com.tw/ktop12.htm 您的問題在 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=73522 回覆如下： 程式參考如下，發問前請先搜尋站內資料，找"FindWindows"相信有一卡車資料。 procedure TForm1.Button1Click(Sender: TObject); var hw:HWND; begin hw:=FindWindow(nil,'未命名 - 記事本');//找到記事本的handle SetForegroundWindow(hw); //設定焦點 end;

請問要打在那女

連放都不會放？ 去看看書吧....

unit Unit2;    interface    uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;    type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;    var
  Form1: TForm1;    implementation    {$R *.dfm}    procedure TForm1.Button1Click(Sender: TObject);
var
hw:HWND;
begin
hw:=FindWindow(nil,'未命名 - 記事本');//找到記事本的handle
SetForegroundWindow(hw); //設定焦點
end;    end.