[CLON]

Хочу спросить у программистов, которые "дружат" с Делфи.

Как считать данные из ехсел файла в программу написанную на Делфи?

При этом, в ехсел файле только одна колонка, но размер колонки от 37 до 14 800 ячеек.

Если можно, то выложите пример кода в Делфи. Так же хорошо было бы знать какие опции надо изменять в настройках Таблицы БД (если это требуется). Например тип таблицы: ЕХСЕЛ? и т.д.

Заранее спасибо всем откликнувшимся.

С уважением CLON.

PS: Просто обычно пользуюсь БД созданными в Парадокс 7.0, а с ехсел-евскими файлами не приходилось работать.

[Sharky]

А зачем тебе Excel? Работай тогда уже с Access..

[Sharky]

И забудь ты о Парадоксе как о вчерашнем дне.

[CLON]

Sharky, спасибо за помощь. Очень помогло. :(

Что делать, если все "рулеточники" собирают статистику в ехселе?

Например, ввести 150-300 спинов "ручками" мне не в лом, а вот 2000-5000 спинов, уже напрягает.

Тогда может подскажешь: как конвертировать ехсел файл в парадокс?

[CorwinXX]

А в каком виде тебе нужен результат?

[Завлаб]

Может есть какие-то дополнительные библиотеки для обращения к файлам Excel? А вообще, я бы открыл файл самим Еxcel'ом и сохранил бы в каком-нибудь другом формате (tab-separated, comma-separated etc.), а потом либо напрямую работал бы с получившимся файлом, либо с помощью обычного текстового редактора преобразовал бы его в последовательность insert'ов.

[Sharky]

Я записываю статистику в обычный текстовый файл, один спин на строчку.. Можно из Excel сделать Save As -> TXT и получишь такой файл.. Но это если некогда возится со всеми этими Оле.

P.S. Позже гляну у себя исходники, было где-то что-то похожее на то что тебе нужно.

[CorwinXX]

Я как раз хотел предложить сохранить файл как CSV и потом считывать построчно (как текстовый файл).

А библиотеки есть. Вот например:
[Зарегистрироваться?]

з.ы. Сам я на Дельфи никогда не писал, поэтому про качество, бесплатность, быстродействие и т.п. данной и других библиотек не знаю.

[Sharky]

Clon, то что тебе нужно (пример).

[CLON]

Огромное спасибо всем откликнувшимся.

Вечером буду пробовать.

Я представлял работу модуля так:

Указываешь линк на файл. Программа его скрыто открывает и считывает значения всех строк в массив и потом скрыто закрывает файл, т.е. пользователь даже и не знает о том, что программа что-то там открывала - закрывала.

Вопрос в другом как считать значение строки в ехсел файле. В парадоксе указывеешь линк и имя таблицы, а обращается к полю таблицы с такой-то записью. Хотелось бы иметь что-то подобное и здесь.

ЗЫ: Еще раз Всем спасибо.

[CLON]

Sharky, открыл файл. Запустил, выдает сообщения об ошибках. Одним словом не фурычит. У Тебя какой Делфи?

Но из текстовой части понял, что Ты преобразуешь массив из Ехсела в текст в обьекте Memo.

Мне нужно текст из Ехсела преобразовать в массив SpinValue : integer; причем массив динамический.

Выкладываю кусочек своей проги. Посмотри если не трудно, что можно сделать?

Заранее спасибо.

[Sharky]

Clon, запусти "по шагам" и посмотри на какой строчке валится пример.. У тебя вообще компилируется проект? Какая версия Excel?

В твоей проге я нифига не понял, что ты пытаешься делать.
Я дал тебе пример работы с Excel через OLE. Во что преобразуется результат не суть важно, пример должен работать (проверял).

[CLON]

Сообщение от Sharky писал пн, 24 июля 2006 22:53

Clon, запусти "по шагам" и посмотри на какой строчке валится пример.. У тебя вообще компилируется проект? Какая версия Excel?

ОК. Сейчас сделаю. Неа не компилируется. Даже не открывается. При открытии сообщает об ошибках причем дважды.

При пошаговом проходе - пишет что не находит модуль .....

[Sharky]

У тебя что-то с путями напутано. Вообще совет: создай папку D:\Projects или E:\Projects и все проекты держи там. Головной боли меньше будет. Компилятор D6.

И думаю тут не всем интересно это, давай на мыло мне пиши..

[CLON]

Сообщение от Sharky писал пн, 24 июля 2006 23:06

У тебя что-то с путями напутано. Вообще совет: создай папку D:\Projects или E:\Projects и все проекты держи там. Головной боли меньше будет. Компилятор D6.

Неа, не люблю я такие приколы. Линки "трассирую" каждый раз, что бы на любом компе прогу можно было устанавливать куда попало. А то с БД, "зашьешь" линк и тю-тю, на другом компе не работает. Либо в точности надо папки создавать, типа С/......

Шарки спасибо всеравно. Не буду тебя больше отвлекать своими вопросами.

[Sharky]

Клон, в сотый раз тебе предлагаю забыть Парадокс и перейти на нормальную БД -- Firebird. Пару dll к exe и БД грузишь откуда угодно, хоть с CD (правда в read only уже). Никаких больше альязов, установок и прочей херни. Зато будут хранимые процедуры, триггеры, sql и прочие радости.

[Shadow]

CLON Судя по ошибкам - ты открыл проект прямо из rar архива...
Распакуй в какую-нить папку и запусти проект оттуда

[CLON]

Shadow, сделал как Ты сказал. Точно.

Теперь вопрос к Шарки:

Не распознает переменные в функуии. Всего 5 ошибок в программе. На скине виден результат "попытки" компиляции программы.

ЗЫ: В очередной раз убеждаюсь, что проще что-то сделать самому, нежели разбираться в чужих кодах.

[Sharky]

Range объявлен как dispinterface в модуле Excel2000.pas (скорее всего он у тебя не стоит, если так поставь компоненты Office 2000). Ты хоть читаешь какие ошибки компилятор выдает? :?

P.S. Там того кода две строчки.. разбираться не с чем, просто ты Delphi плохо знаешь, имхо.

[Sharky]

Вот откомпилированный пример. (Чтобы не говорил, что не работает )