Hi,
hier ist ein getestetes Beispiel, wie man TTM_GETTEXT verwendet. Irgedwo stand, dass man lieber mit TTM_GETTOOLINFO arbeiten soll. Bei fremden Fenstern wird es unter XP jedoch nicht funktionieren, eventuell mußt du es mal mit VirtualAlloc versuchen.
Delphi-Quellcode:
var
ToolTipp: TToolInfo;
ControlHandle, ToolTipHandle: HWND;
begin
ControlHandle:=
//Handle des Fensters wo der Tip angezeigt wird
ToolTipHandle:=
//Handle des Tooltips
ZeroMemory(@ToolTipp, SizeOf(ToolTipp));
ToolTipp.cbSize:= SizeOf(ToolTipp);
ToolTipp.hwnd:= ControlHandle;
ToolTipp.uId:= ToolTipp.hwnd;
SetLength(Text, 200);
ToolTipp.lpszText:= PChar(Text);
SendMessage(ToolTipHandle, TTM_GETTEXT
(*TTM_GETTOOLINFO*), 0, LPARAM(@ToolTipp));
Caption:=
string(ToolTipp.lpszText);