Versuch mal KeyPreview vom Form - und dann in OnKeyPress die Tasten abfragen (beides im
OI des Form)
Delphi-Quellcode:
if Webbrowser1.OleObject.Document.Selection.createRange.Text = '' then
begin
end
else
begin
Clipboard.AsText := Webbrowser1.OleObject.Document.Selection.createRange.Text
end;
Sieht das nicht so viel besser aus?
Delphi-Quellcode:
if Webbrowser1.OleObject.Document.Selection.createRange.Text <> '' then
Clipboard.AsText := Webbrowser1.OleObject.Document.Selection.createRange.Text