Adicionar cada linha como 1 item no db

Olá pessoal,
tenho um ListView, no qual tem 4 colunas e vamos supor q nele tenha 5 linhas de dados.
Bem, para fazer uma verificação linha por linha dele e ver os ítems fiz o seguinte:
(O ´Fixa´ é o nome do ListView)
var
Rec : TSearchRec;
i,j: integer;
begin
i:=0;
while fixa.Items.Count > 0 do
begin
i := i + 1;
if i <= fixa.Items.Count then
begin
j := i - 1;
showmessage(fixa.items.Item[j].SubItems.Strings[1]); end else begin exit; end;
end;

Ok.. mas agora, invez daquele showmessage eu gostaria de gravar aquela string numa determinada coluna do dbf.. e pra isso, qual seri ao comando sql ?

Obrigado