Autonumericos

[[Caral]]

Hola crc2005
Solo por curiosidad para ti haz esta prueba:
En una aplicacion nueva, coloca 2 edit y un boton, en el evento on click del boton pon:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var
  A: String;
  N: Integer;
begin
  A:= Edit1.Text;
  N:= 1;
  Edit2.Text:= Edit1.Text + IntToStr(N);
end;

end.

Ejecutalo, pon en el edit 1 la letra A, y presiona el boton.
Esto no hara lo que necesitas pero te va a dar muchas ideas, en vase a esto podras hacer lo que quieres.
Saludos