...
- procedure CSVToStringList(Lahde: String; Kohde: TStringList; Erotin: Char; RiisuLainausMerkit: Boolean);
purkaa csv muodossa olevan merkkijono StringListaksi esim.
lista := TStringList.create;Panel s := '1;"ohje esimerkki";12,2';
CSVToStringList(s,lista,';',true);
for i:= 0 to Lista.count -1 do
ShowMessage(Lista.items[i]);
Katso myös CSV_Tuonti.htm esimerkki.
...