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

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

Горю! Сдавать программу через 2 дня! :((


KidMan ©   (2002-11-27 17:02:00) 

Здравствуйте Мастера!
Помогите плиз... сдвать через 2 дня прогу а никак не получается постоить в Word следующую таблицу
--------------|-------------------------
| заголовок |
заголовок |------------------------|
| заголовок | загловок |
--------------|-------------------------
данные | данные | данные |
данные | данные | данные |
----------------------------------------

Заранее всех благодарю!


KidMan   (2002-11-28 13:03:00) [1]

Попробую!
Спасибо большое Дядя Будда!


Дядя Будда   (2002-11-28 12:27:00) [2]

Создаешь таблицу, которую, как ты говоришь создать можешь:
|------|-------|--------|
| | | |
|------|-------|--------| и т.д.

Под заголовок делаешь две строки
Далее:

var
c1, c2: Cell;
Begin
C1:= WordApplication.ActiveDocument.Tables(1).Cell(1, 2);
C2:= WordApplication.ActiveDocument.Tables(1).Cell(1, 3);
C2.Merge(C1);

C1:= WordApplication.ActiveDocument.Tables(1).Cell(1, 1);
C2:= WordApplication.ActiveDocument.Tables(1).Cell(2, 1);
C2.Merge(C1);
end;


KidMan   (2002-11-28 11:19:00) [3]

Ребят... больше никаких идей?


Mad_Ghost   (2002-11-28 07:53:00) [4]

КидМан, с макросами не нужно уметь работать, там есть такая фича Сервис-Макрос-Начать запись макроса, и делаешь все то что хотел бы автоматизировать, потом останавливаешь, смотришь, логически понятно хотя я и не разу не занимался бейсиком, но все равно немного понятно, просто этот код вставляешь когда с вордом работаешь, я вот только не знаю как всавлять макросы, не приходилось не разу пока ещё


KidMan   (2002-11-28 07:39:00) [5]

Неужели никак ... ребят?


KidMan   (2002-11-27 19:39:00) [6]

Кто нибудь плиз!


KidMan   (2002-11-27 18:13:00) [7]

К сожалению я не могу работать с макросами... Да и Ворд знаю постолько поскольку... Просто мне необходимо SQL запрос вывести в ворд...
А знаний не хватает... (((


TTCustomDelphiMaster   (2002-11-27 17:54:00) [8]

Идея простая. Включить запись макроса, сделать все что нужно, остановить запись макроса и посмотреть как это выглядит на VB. Перенести этот код в Delphi


KidMan   (2002-11-27 17:31:00) [9]

Я копался в хелпе... но к сожалению там трудно разобраться в нем...

Может будут какие нибудь еще идеи?
(с наждеждой так)


Andy78   (2002-11-27 17:23:00) [10]

Это плохо. Кроме как использовать шаблон не могу ничего придумать. Вообще-то может надо покопаться в VBasic.


KidMan   (2002-11-27 17:21:00) [11]

Я могу создать таблицу типа
------------------------------
| |
------------------------------
| |
------------------------------
и так далее...

и заполнить ее данными...из БД например...
Пользуюсь я не компонентами на странице серверс а методом CreateObject.... Но дело не в этом ... Дело в том что я не могу создавать внутри ячейки еще пару дополнительных ячеек...
Вы меня поняли? Поняли почему я рисовал таблицу в своем вопросе?


Andy78   (2002-11-27 17:16:00) [12]

Тогда пиши шаблоны и заменяй там слова на то что тебе нужно.
Используй компонент WordDocument на стр. Servers

var WB: OleVariant;

...

WB:= WordDocument.Content;

....

WB.Find.Execute(FindText:="то что нужно заменить", ReplaceWith:= "Нужная строка", Replace:=2);

...


KidMan   (2002-11-27 17:04:00) [13]

К сожалению именно в Ворд! :((


Andy78   (2002-11-27 17:03:00) [14]

Обязательно в Word ?

В Excel проще.


Наверх

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