Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#5

Re: Zwischenablage auslesen - kein Bild, kein einfacher Text

  Alt 30. Jul 2007, 10:08
Hallo Ben,

klar kannst du dir das XML-Dokument auch als String besorgen:

Delphi-Quellcode:
function ClipboardXmlToStr(cf: Word): string;
var
  ch: THandle;
  pwc: PWideChar;
begin
  if ClipBoard.HasFormat(cf) then
  begin
    ClipBoard.Open;
    try
      ch := Clipboard.GetAsHandle(cf);
      pwc := GlobalLock(ch);
      Result := WideCharToString(pwc);
      GlobalUnlock(ch);
    finally
      Clipboard.Close;
    end;
  end else Result := '';
end;
Die Unit MSXML2 kannst du dir über TLIBIMP erzeugen.

Freundliche Grüße
  Mit Zitat antworten Zitat