Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.12.23;
Скачать: CL | DM;

Вниз

TStringList.QuoteChar   Найти похожие ветки 

 
SkyN   (2007-11-27 14:54) [0]

procedure TForm1.FormCreate(Sender: TObject);
var
 S: String;
 SL: TStringList;
begin
 S := "attr1="доПробела ПОСЛЕ"; attr2=100";
 SL := TStringList.Create;
 try
   SL.QuoteChar  := """; //пробовал удалить эту строчку
   SL.Delimiter  := ";";
   SL.DelimitedText  := S;

   MessageBox(0,PChar(SL.Values["attr1"]),PChar(S),0);
 finally
   if assigned(SL) then freeandnil(SL);
 end;
end;

упорно выдает "доПробела , а хотелось бы "доПробела ПОСЛЕ"


 
Reindeer Moss Eater ©   (2007-11-27 15:20) [1]

Сначала посмотри вот это :
SL.DelimitedText  := S;
ShowMessage(sl.text);

потом смотри реализацию SetDelimetedText;


 
SkyN   (2007-11-27 15:43) [2]

значит вместо
   SL.QuoteChar  := """; //пробовал удалить эту строчку
  SL.Delimiter  := ";";
  SL.DelimitedText  := S;

буду юзать
SL.Text := StringReplace(S,";",#13#10,[rfReplaceAll]);
спасибо



Страницы: 1 вся ветка

Текущий архив: 2007.12.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.023 c
2-1196549267
bobby
2007-12-02 01:47
2007.12.23
Помещение архива в БД MsSQL


2-1196405007
ardent
2007-11-30 09:43
2007.12.23
table order


11-1180718313
Galkov
2007-06-01 21:18
2007.12.23
Использование EM_GETSEL в KOL


3-1187338745
alex_tonk
2007-08-17 12:19
2007.12.23
Написание процедуры создания DBF файла


2-1196011998
Sonia
2007-11-25 20:33
2007.12.23
Числа Фибоначчи и рекурсия