проблема с excel

Gwa
Дата: 25.04.2011 14:25:31
Титов,
Вы же понимаете что должно получиться в Excel?
Так плюньте на этот VB-шный код.
Примеров как выгружать данные в XL из Delphi на форуме море..
Титов
Дата: 25.04.2011 14:28:41
Gwa,

знаю я все выгрузил уже почти только вот осталсь замарочка с наименованием которое я не как не могу выгрузить без изменения высоты ячейки и не измения направление текста высоты шрифта короче должно быть все по ГОСТу
fd00ch
Дата: 25.04.2011 14:44:31
Титов, всё ж просто :-) Ширина столбца известна - найди как получить ширину в пикселях. Дальше создаешь временную канву, задаешь ей свой гостовский шрифт и делаешь цикл по словам: если Canvas.TextHeight(очередная_строка) меньше ширины столбца - добавляешь в строку ещё одно слово. Если нет - начинаешь новую строку.
fd00ch
Дата: 25.04.2011 14:45:11
fix: TextWidth()
Соколинский Борис
Дата: 25.04.2011 15:11:32
fd00ch
Титов, всё ж просто :-) Ширина столбца известна - найди как получить ширину в пикселях. Дальше создаешь временную канву, задаешь ей свой гостовский шрифт и делаешь цикл по словам: если Canvas.TextHeight(очередная_строка) меньше ширины столбца - добавляешь в строку ещё одно слово. Если нет - начинаешь новую строку.
Для этой цели проще использовать что-то типа временного Tmemo: задать шрифт, ширину и перенос слов, загрузить текст и копировать из него построчно.
Титов
Дата: 25.04.2011 16:56:54
фсем спасибо алгоритм написан!)) програмко работает!))
fd00ch
Дата: 25.04.2011 21:06:32
Соколинский Борис
Для этой цели проще использовать что-то типа временного Tmemo: задать шрифт, ширину и перенос слов, загрузить текст и копировать из него построчно.
Это, мягко говоря, нетехнологично :-)
Титов
фсем спасибо алгоритм написан!)) програмко работает!))
Молодец что не рассказал как...
Соколинский Борис
Дата: 25.04.2011 22:21:04
fd00ch
Это, мягко говоря, нетехнологично :-)
Зато дешево, надежно и практично (с).
Титов
Дата: 26.04.2011 07:59:54
fd00ch
Соколинский Борис
Для этой цели проще использовать что-то типа временного Tmemo: задать шрифт, ширину и перенос слов, загрузить текст и копировать из него построчно.
Это, мягко говоря, нетехнологично :-)
Титов
фсем спасибо алгоритм написан!)) програмко работает!))
Молодец что не рассказал как...


кому надо будет поделюсь!))