kopiere markeret tekst fra vilkårlig apllikation

Du kunne måske bruge et lille component som hedder SendKeys.

I det eksempel jeg har lavet herunder skal du havde fx notepad åben og kalde det ”COPY TO”.
Nå du så har marker en tekst i et program eller dokument skal du bare start dit program med fx en genvejtast og sørge for at dit program bliver startet skjult.
SendKeys vil så sende CTRL+C til det aktive program / dokument og der sende CTRL+V til et fx notepad som hedder ”COPY TO”.

OBS det er kun en ide jeg har ikke prøvet eksemplet.
HUSK altid CTRL_UP efter en CTRL_DN. ?

var
	WH : HWND;
	wintext : LPTSTR;
	nsize : Integer;
begin
	WH := GetForegroundWindow;
	nsize := 250;
	GetMem(wintext, nsize);

	GetWindowText(WH, PChar(wintext), nsize);

        // sende CTRL+C til aktive window.

	SendKeysTo(wintext, SK_CTRL_DN + ’C’);
        SendKeysTo(wintext, SK_CTRL_UP);
        
        // sender CTRL+V til windowtitle "COPY TO"
        SendKeysTo(”COPY TO”, SK_CTRL_DN + ’V’);
        SendKeysTo(”COPY TO”, SK_CTRL_UP);
End;