Mach doch mal zum Test das hier:
Code:
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.