Clipboard-Aktion auslösen

[Sanchez]

So, jetzt bin ich dahinter gekommen. Ist ja eigentlich ganz einfach:

Delphi-Quellcode:

    if assigned(ActiveControl) then begin
      ActiveControl.Perform(WM_COPY, 0, 0);
    end else begin
      Perform(WM_COPY, 0, 0);
    end;

... und zum Einfügen nimmt man WM_PASTE statt WM_COPY.