Forum: Sonstige Fragen zu Delphi
Delphi
by Matze,
23. Aug 2003
Dann mach's so:
procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key = 226 then memo1.Color:=clyellow;
//für die <-Taste
end;
Gruß Matze
Forum: Sonstige Fragen zu Delphi
Delphi
by Matze,
23. Aug 2003
Mach doch mal zum Test das hier:
procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if VK_... then Memo1.Color:=clyellow;
end;
Wenn das memo dann gelb wird, dann weißt du, ob du bei vk_... das richtige eingegeben hast.
Ich weiß nicht, welche Abkürzung die Taste "<" hat.
Forum: Sonstige Fragen zu Delphi
Delphi
by Matze,
23. Aug 2003
procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if VK_... then ...;
end;