autonumerico con letra con tabla paradox

[marcoszorrilla]

E001
La manera de solucionarlo es simple:

En una tabla auxilar guarda el último número generado por ejemplo el:1

En el event OnNewRecord del TTable haces:

Código Delphi [-]
Table1Numero.AsString:='E'+FormatFloat('000',TableConfigura.Value +1);

{En este momento en la tabla configura el último número sigue siendo el 1, si se consolida la grabación,
 ejemplo en el evento BeforePost del Ttable correspondiente.}

Tableconfigura.Edit;
Tableconfigura.Value:=Tableconfigura.Value +1;
Tableconfigura.Post;

Un Saludo.