Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

  • 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.

...