Básicamente debes conectarte a la tabla y recorrerla hasta que no haya mas elementos.
Para cada elemento escribes los datos en un fichero.
Código Delphi
[-]
AssignFile(F, 'TextoPlano.txt');
Rewrite(F);
tabla.Open;
while (not tabla.EOF) do
begin
WriteLn(F, tabla.FieldByName('CAMPO1').AsString + ', '+ tabla.FieldByName('CAMPO2').AsString + ...);
end;
CloseFile(F);