Código Delphi [-] function GetWindowText(Handle: THANDLE): AnsiString; var Buffer: array [0..255] of AnsiCHAR; begin SendMessage(Handle, WM_GETTEXT, 255, Cardinal(@Buffer[0])); Result:= Buffer; end;
function GetWindowText(Handle: THANDLE): AnsiString; var Buffer: array [0..255] of AnsiCHAR; begin SendMessage(Handle, WM_GETTEXT, 255, Cardinal(@Buffer[0])); Result:= Buffer; end;