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

//声明:
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;

//效果图: