Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Union,
26. Apr 2005
Und was ist wenn Du das Übel ganz gemein an der Wurzel packst und nach dem Aufruf der Scrollfunktion mit:
TWinControl(Sender).SetFocus;Wieder das ürpsprüngliche Edit selektierst?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Union,
26. Apr 2005
Wie hast Du denn den Hotkey realisiert? Vielleicht setzt die Komponente auch selber den Focus. Bei folgendem Beispiel (ein Edit und ein Memo zum Testen) verliert das Edit jedenfalls nicht den Focus, das Memo scrollt ordnungsgemaess:
procedure TFormHotKeyTest.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if shift = then
begin
case key of
VK_LEFT...