Ich habe folgenden Code:
Delphi-Quellcode:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
AllTypedKeys.Add(Key);
end;
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
for i := 0 to AllTypedKeys.Count-1 do
showmessage(AllTypedKeys[i]);
end;
So.. jetzt gelingt es mir nicht z.B. die letzten, sagen wir, 5 Eingaben zu überprüfen, also
mir etwas anderem zu vergleichen.
Wie gehe ich da vor?