WinAPI: GetParent - 获取指定窗口的父窗口句柄

为什么80%的码农都做不了架构师？>>>   

//声明:
GetParent(
  hWnd: HWND {窗口句柄}
): HWND;     {返回父窗口句柄}

 
 
 
 
 

 

 

  

//举例:
procedure TForm1.Button1Click(Sender: TObject);
var
  h1,h2: HWND;
begin
  h1 := GetParent(Button1.Handle);
  h2 := Panel1.Handle;
  ShowMessage(IntToStr(h1)); {590862}
  ShowMessage(IntToStr(h2)); {590862}

  h1 := GetParent(Panel1.Handle);
  h2 := Self.Handle;
  ShowMessage(IntToStr(h1)); {459824}
  ShowMessage(IntToStr(h2)); {459824}

  ShowMessage(IntToStr(GetParent(Handle))); {0}
end;

 
 
 
 
 

 

 

  

//效果图:

---

转载于:https://my.oschina.net/hermer/blog/320039