Deglosar Cadena Archivo CSV

[el_barto]

Buenas Tardes:

Tengo una duda con respecto a un archivo csv y es la siguiente:

Mediante una variable hago lo siguiente para obtener los datos de una linea de el archivo:

for i := 0 to lista.Count - 1 do
      begin
        linea := lista.strings[i];

La variable linea me muestra por ejemplo los siguiente;

1, 80143, N, HOLA

Si yo tengo asignadas una variable para obtener cada uno de los valores que me devuelve el archivo por linea, como puedo hacer para guardar cada columna asi:

VARA = 1
VARB = 80143
VARC = N
VARD = HOLA

Agradezco cualquier colaboracion