Zitat von
Mini-Programmierer:
Wenn ich eine Label auf Tabsheet, wo auch Webbrowser drauf liegt, lege, dann wird die Enter-Taste in Webbrowser nicht aktiviert. Wenn ich die Label lösche, dann funktioniert's wieder
Das Problem ist nur mit Label. Wenn ich einen Edit drauf hinzufüge dann ist kein Problem
Warum ?!
Das Problem liegt hier:
Delphi-Quellcode:
function TForm1.GetCurrentWB: TWebbrowser;
begin
Result := nil;
with PageControl1 do
if ActivePage.Controls[0] is TWebbrowser then
Result := (TWebbrowser(ActivePage.Controls[0]));
end;
Konkret hier:
TWebbrowser(ActivePage.Controls[0]));
Das Umschreiben / Verbessern der Funktion überlasse ich mal dem Fragesteller.