Crear un mask Edit, y validar el Campo !!

[jmedina]

si esoes correcto marcos, lo que pasa es que asi estaba, pero despues dijeron queno que se iba a capturar sin dar un numero consecutivo, algunas veces si se dara el caso pero otras, no, como crees que le pueda hacer, mi tipo de dato es String, y la nomenglatura es 0000/2005


Gracias saludos

[marcoszorrilla]

Si /2005 es fijo eso lo puedes añadir tú directamente, entonces lo que necesitas es un edit con ancho permitido 4, que solamente te permite introducir números, en el evento on exit, le añades ceros por la izquierda y listo.
[delphi]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in [#8,'0'..'9']) then key:=#0;
end;
[/Delpi]


Un Saludo.