¿Como extraer letras de una cadena?

[[oscarac]]

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