Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Подскажите, как можно решить такую проблему… [D5, WinXP]


SemFLY ©   (2002-08-03 23:57:00) 

Я из программы заполняю шаблон Word’овского документа, но дело в том, что некоторые ячейки таблицы могут вместить определённое количество символов.
Вопрос: Как подсчитать количество символов и если их больше, чем надо в ячейке, то избыток символов перенести в следующую ячейку.
Короче осуществить перенос.
- - -
Я пытался это сделать подсчетом символов в Edit.Text ещё на стадии заполнения документа таким образом:

Name := "Test"; // закладка в документе
WordApplication1.Selection.GoTo_(What, Which, Count , Name);
InsText0 := Edit.Text;
InsText1 := Copy(InsText0,1,20); // 1-го по 20-ый символ вносить в 1-ую ячейку, а остальное в 2-ую
WordApplication1.Selection.TypeText(InsText1);

-----------------------

Может кто-то знает, как это сделать лучше ?

= = = = = = =

Спасибо !


SemFLY   (2002-08-04 04:43:00) [1]

Оказалось, как мне показалось, всё не так сложно, свой способ усовершенствовал ! ;)))


Наверх

Титульная страница Поиск, карта сайта Написать письмо