[SOLVED] change "comma" and "double-quotes" to "empty-space" for
Lines.CommaText
lazarus / 16-Databases

----------------------------------------------------------------------
Elmug · 2012-07-07 14:37

Hi everyone,

I am to get a string from a Memo1, using Lines.CommaText, but the
string has comma-separator, and also don't want the double quotes.

I am having trouble changing those to space, and would appreciate
help.

I try  SetQuoteChar := ' '; but get "identifier not found
"SetQuoteChar".

Thanks!

----------------------------------------------------------------------
Avishai · 2012-07-07 16:12

This may get you started.

Procedure Tform1.Speedbutton5click(Sender: Tobject);
var
  AList: TStringList;
Begin
  AList:= TStringList.Create;
    AList.CommaText:= ListBox1.Items.CommaText;
    AList.Delimiter:= ' ';
    Label1.Caption:= AList.DelimitedText;
  FreeAndNil(AList);
End;

----------------------------------------------------------------------
Avishai · 2012-07-07 20:43

Try StringReplace for " with a space

----------------------------------------------------------------------
Elmug · 2012-07-07 20:55

Quote from: Avishai on July 07, 2012, 10:43:34 pmTry StringReplace for
" with a space
Hi, Avishai,

I deleted the previous post where I thought the comma had been
replaced by a space, using your suggestion.

I will try some more and get back, with results, or need for
additional help.

Thanks!

----------------------------------------------------------------------
Elmug · 2012-07-08 01:48

I found out I could simply use:

aString : String;
aString := TEdit(Memo1).Text;


Thanks everyone!