Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Mamphil,
3. Okt 2004
Noch eine Ergänzung (wenn jemand diesen Beitrag über die Hilfe findet...):
Wenn man die Tastenkombination eingibt ertönt das "Standardton Warnsignal". Dieses bekommt man weg, wenn man die Zeile
PeekMessage(Msg, 0, WM_CHAR, WM_CHAR, PM_REMOVE); ergänzt und die Variable Msg: TMsg; definiert.
Mamphil
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Mamphil,
3. Okt 2004
Hi!
Danke - genau das ist die Lösung gewesen. Die Funktion war schon im OnKeyDown drin, genauso war KeyPreview schon auf true gesetzt. Trotzdem danke für die Tipps!
Vielen Dank für eure schnellen Antworten!
Mamphil
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Mamphil,
3. Okt 2004
Hi!
Ich möchte, dass der gesamte Text eines TMemo durch die Tastenkombination + markiert wird. Bisher habe ich diesen Code, der aber leider nicht funktioniert - die Suchfunktion hat mir leider auch nicht geholfen...
procedure TWinQuery.queryStatementKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key = Ord('a')) and (ssCtrl in Shift) then
begin
Key := 0;...