Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sharky,
18. Sep 2005
:wall: :wall: :wall:
Ich bin ja so blöde ;-)
Ich habe es bei mir immer im OnKeyDown getestet und den Code hier nur für das OnKeyPress angepasst. :oops:
procedure TSynDemoForm.SynEdit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key = Vk_Tab) and (Synedit1.SelLength > 0) then
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sharky,
18. Sep 2005
Wie? Was? Keystrokes? Was machst Du denn mit denen in diesem Fall? Die brauchen dich doch überhaupt nicht zu kümmern.
Einfach den Code von mir in das .OnKeyPress, WantTabs auf True und fertig ist der Lack.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sharky,
18. Sep 2005
Hai n0b0dy,
hast Du bei deinem SynEdit auch .WantTabs := True; eingestellt? :stupid:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sharky,
18. Sep 2005
Hai l0b0dy,
Du hast einen kleinen (denk)fehler in deinem Code ;-)
Nach dem abarbeiten der OnKeyPress/OnKeyDown Methoden wird die gedrückte Taste trotzdem von dem Control verarbeitet. Bei dir bedeutet dies:
Aufrufen deiner OnKeyPress-Methode
Diese abarbeiten
Das Char welches in der Variablen Key steht an das Controll übergeben
Das Controll arbeitet weiter