Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> подсчет символов в ячейке 
:(
    Опции темы
123456789igor
Дата 14.11.2012, 01:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 47
Регистрация: 27.3.2011

Репутация: нет
Всего: нет
Как подсчитать количество символов в excel таблице через delphi?
PM MAIL   Вверх
Данкинг
Дата 14.11.2012, 01:30 (ссылка) | (голосов:2) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
Код

ex: variant;
...
ex:=createoleobject('excel.application');
ex.Workbooks.open('c:\file.xls');
showmessage(length(trim(ex.activeworkbook.activesheet.cells.[1,1].value)));
ex.application.quit;
ex:=unassigned;



--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
123456789igor
Дата 14.11.2012, 02:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 47
Регистрация: 27.3.2011

Репутация: нет
Всего: нет
Почему так не работает?
      olo:double;
      olo:=Excel.cells[9,30].Value;
      if (length(trim(Excel.cells[a_,24].value))) > 7 then
      Excel.cells[9,30]:=olo;

значение в 9,30-0,9829382898
Ole error....

Добавлено через 3 минуты и 17 секунд
Так тоже не работает
showmessage(length(trim(excel.activeworkbook.activesheet.cells[9,30].value)));
[Error] Unit1.pas(75): Incompatible types: 'String' and 'Integer'
PM MAIL   Вверх
Данкинг
Дата 14.11.2012, 10:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
Цитата(123456789igor @  14.11.2012,  03:37 Найти цитируемый пост)
Incompatible types: 'String' and 'Integer' 

Ошибка о чём говорит?


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
123456789igor
Дата 14.11.2012, 13:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 47
Регистрация: 27.3.2011

Репутация: нет
Всего: нет
length для строки я понял тогда почему так не работает?
showmessage(length(trim(VarToStr(excel.cells[9,30].value)));
или нужно вначале в переменную типа string записать значение ячейки а потом смотреть длину записи?
PM MAIL   Вверх
superVad
Дата 14.11.2012, 15:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

Репутация: 7
Всего: 15
123456789igor, что возвращает функция length?
PM MAIL   Вверх
Poseidon
Дата 28.11.2012, 01:48 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 9
Всего: 133
Цитата(superVad @ 14.11.2012,  15:01)
123456789igor, что возвращает функция length?

 smile 
Какие-то циферки? И почему я не могу показать эти циферки через мэсседж? Циферки - это же тоже текст. Не правильная какая-то у вас дельфи


--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
superVad
Дата 28.11.2012, 10:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

Репутация: 7
Всего: 15
Цитата(Poseidon @  28.11.2012,  00:48 Найти цитируемый пост)
Какие-то циферки? И почему я не могу показать эти циферки через мэсседж? Циферки - это же тоже текст. Не правильная какая-то у вас дельфи

Да - видать, это оказался не разрешимы вопрос. smile
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.1418 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.