P
phenix_sd
Unregistered / Unconfirmed
GUEST, unregistred user!
uses IdDNSResolver;
procedure TForm1.Button1Click(Sender: TObject);
var
p:HiLoBytes;
begin
p.LoByte:=WA_ACTIVE;
p.HiByte:=1;
Sendmessage(form1.Handle,WM_ACTIVATE,Word(p),form1.Handle);
end;
编译通过,但什么都不干,谁能为我讲解一下WM_ACTIVATE这个消息
procedure TForm1.Button1Click(Sender: TObject);
var
p:HiLoBytes;
begin
p.LoByte:=WA_ACTIVE;
p.HiByte:=1;
Sendmessage(form1.Handle,WM_ACTIVATE,Word(p),form1.Handle);
end;
编译通过,但什么都不干,谁能为我讲解一下WM_ACTIVATE这个消息