Ver Mensaje Individual
  #3  
Antiguo 21-07-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.010
Reputación: 20
oscarac Va por buen camino
Si las posiciones son fijas entonces podrias hacerlo como bien te menciona marcoszorrilla, pero si son variables y delimitadas por "," entonces tendrias que hacerte un procedimiento que lea la cadena y vaya asignando cada vez que encuentre una coma ","

Algo Asi
Código Delphi [-]
 
 
     for i:= 1 to Length(sLinea) do
      begin
        vChar := Copy(sLinea, i, 1);
        if vChar = ',' then
        begin
          Inc(vContador);
          case vContador of
            1: begin CDSCCostoCCosto.Value := vCadena; vCadena:= ''; end;
            2: begin CDSCCostoDescripcion.Value := vCadena; vCadena:= ''; end;
          end
        End
        Else
          vCadena := vCadena + vChar;

vContador te indica el bloque que esta leyendo.. en el ejemplo solo hay 2 bloques
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita