[ronalg]

Bueno una sería así:

Código Delphi [-]
function convertir_n(valor:integer;const cant_dig:byte=3):string;
var val_txt,ceros:string;
    i,leng_val:integer;
begin
     val_txt:=inttostr(valor);
     leng_val:=length(val_txt);
     if leng_val>=Cant_dig then
     begin
          result:=val_txt;
     end
     else
     begin
          ceros:='';
          for i:=1 to (cant_dig-leng_val) do
          begin
               ceros:=ceros+'0';
          end;
          result:=ceros+val_txt;
     end;
end;

esto es para convertir un valor entero en la cantidad de digitos que quieras, y este resultado sera una cadena string.

PERO... (siempre hay un pero), si el valor a mostrar es un campo de una tabla como el codigo autogenerado o algo asi, lo unico que tienes que hacer es modificar el valor de la propiedad DISPLAYFORMAT del campo:

DisplayFormat=####00

Esto te mostrara cualquie valor menor a 10 con dos digitos obligatorios y si e mayo no se hara problema igual te los muestra completos, es lago asi como un maskedit directo para el campo.

ESpero te sirva.