X-88 Posted March 11, 2013 Share Posted March 11, 2013 how I can remove the separator between char 1, with another char?... if I use spaces, the *. nfo will separate like something is messed up Code : procedure TForm1.Export1Click(Sender: TObject); var I : Integer; SL : TstringList; begin SL := TstringList.Create; for I := 0 to SG.RowCount - 1 do begin SG.Rows.Delimiter := #32; // replace coma with spaces SL.Add(SG.Rows.DelimitedText); end; if not SD.Execute then Exit; SL.SaveToFile(SD.FileName); SL.Free; end; ZN.zip Link to comment
kao Posted March 11, 2013 Share Posted March 11, 2013 for i := 0 to SG.RowCount - 1 do begin finalString := ''; for j := 0 to SG.Rows[i].Count - 1 do begin finalString := finalString + SG.Rows[i][j]; end; SL.Add(finalString); end; Link to comment
X-88 Posted March 11, 2013 Author Share Posted March 11, 2013 for i := 0 to SG.RowCount - 1 do begin finalString := ''; for j := 0 to SG.Rows.Count - 1 do begin finalString := finalString + SG.Rows[j]; end; SL.Add(finalString); end; finalString as what, String grid / TStringList? ... thx b4 Link to comment
kao Posted March 11, 2013 Share Posted March 11, 2013 It's obvious from the usage, isn't it? It's just a simple "string" Link to comment
X-88 Posted March 11, 2013 Author Share Posted March 11, 2013 (edited) ok, I thought it was ..., is appropriate, but the file just does not fit with those of its editor, but no matter I'll try to tackle it Thk's Kao! Edited March 11, 2013 by X-88 Link to comment
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now