Ver Mensaje Individual
  #5  
Antiguo 12-04-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por DasGrun Ver Mensaje
si todo tiene el mismo Formato OC#######.
Hola DasGrun.

Entonces la sugerencia de oscarac tiene que funcionar perfectamente.

Podrías probar usando:
Código Delphi [-]
edit1.Text := Copy(tabla1Campo.value, 3, MaxInt)
Pero no hace diferencia en cuanto al resultado que arroja.


Otra forma (pero más rebuscada) sería:
Código Delphi [-]
var
  s: string;
begin
  s:= tabla1.FieldByName('CAMPO').AsString;
  Delete(s,1,2);
  ShowMessage( s ); // o lo que hagas con el resultado...
end;

Un saludo.

Edito: ¿ Podrías especificar un poco mas el: 'no funciona' ? Es decir, te da otra cadena de la esperada, un error, ...?
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 12-04-2011 a las 19:15:15.
Responder Con Cita