22.06.2006, 17:57 | #1 |
Участник
|
Определяем массив из 20 строк длинной по 500 символов - m
И пишем IF NOT CSV.OpenFile('') THEN EXIT; if not CSV.GetLine(m) then exit; // пропускаю названия полей. WHILE CSV.GetLine(m) DO BEGIN m[1] - первое поле m[20] - последнее, оно же двадцатое end; Вот все, что нужно для загрузки. Для выгрузки я использую копирование в Эксель через клипборд. с кавычками всё ok. Прогрессбар имеется |
|
22.06.2006, 18:35 | #2 |
Участник
|
Вот немного фобов. |
|
08.05.2013, 17:15 | #3 |
Участник
|
Вот немного Исходников.
|
|