TEdit anderer Anwendungen mit der Maus auslesen

[EWeiss]

Auslesen von Text einer Fremden Anwendung.
Beispiel:
Programm starten!
Notepad starten Text eingeben mit der Maus drüberfahren und fertig!

Das Programm ist weiter ausbaufähig es müssen nur Namen anderer Controls übergeben(verglichen) werden.
If (InStr(1, Klasse, 'Edit') <> 0) Or (InStr(1, Klasse, 'text') <> 0) Then REMOVED..
gruß