Цитата:
|
Сообщение от xchrom
или как вариант в результирующей строке меняешь пробелы на запятую, но это если пробелов в других данных быть не может
|
Можно подребней.
Я использую следующий код
Код:
procedure TForm1.BitBtn3Click(Sender: TObject);
var c:integer;
s0,s1, rs :string;
begin
s0:= DBGrid1.Columns[0].Field.AsString; //можно ли задать здесь условие замены пробелов на "," и """
s1:= DBGrid1.Columns[1].Field.AsString;
rs := rs + '"'+s0+'"'+','+'"'+s1+'"';
ListBox1.Items.Add (rs);
end;