[GLGB]

Gracias por sus sugerencias, de hecho se me hizo un poco complicado conl a solución que me dieron, además que seguí trabajando con el código que ya tenía. Ya me función y está en Builder, x si a alguien le sirve

Código Delphi [-]

if (Memo->Lines->Count <=0)
   ShowMessage ("Primero debe seleccionar un archivo");
else
   {
    AnsiString cadena;
    int contador_filas;
    int no_caracteres;
    int no_filas;
    int caracter,flag;
    
    contador_filas=Memo->Lines->Count;
    
    for(no_filas=1; no_filas<=contador_filas; no_filas++ )
       {
        flag=0;
        cadena=Memo->Lines->Strings[no_filas];           
        
        no_caracteres=cadena.Length(); 
 
       for ( caracter=1; caracter<= no_caracteres; caracter++)
            {
             if (cadena[caracter] != ',')
                  Edit1->Text=Edit1->Text + cadena[caracter];
             
              else                   
                 {
                    flag=flag+1;
 
                    if(flag==1)
                      Edit2->Text=Edit1->Text;
 
                     if (flag==2)
                        Edit5->Text=Edit1->Text;
 
                     if(flag==3)
                      Edit3->Text=Edit1->Text;
 
                     if(flag==5)
                      Edit4->Text=Edit1->Text;
 
                    Edit1->Clear();
               }
     }
ShowMessage("ARCHIVO EXPORTADO.....");
}

Gracias a todos!!! y espero les sirva de algo mi código....