Comparar caracteres tecleados con los de una cadena

[Calculador]

Hola a todos.
Necesito comparar los caracteres que voy tecleando con los que ya tengo en una cadena.
La cadena sería, por ejemplo: "ABC123"
Se que se hace en OnKeyPress.
Lo que yo necesito es que solamente se admitan 3 letras y tres numeros en el orden que estan en la cadena.
¿Me podeis ayudar con algo de código?

[marcoszorrilla]

Si es en el orden que tu indicas, creo que sería mucho más simple utilizar un MaskEdit, con la máscara de edición:>LLL999

O en tiempo de ejecución:

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 begin
 MaskEdit1.EditMask:='>LLL999';
 end;

Un Saludo.