Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.09;
Скачать: CL | DM;

Вниз

Горю! Сдавать программу через 2 дня! :((   Найти похожие ветки 

 
KidMan ©   (2002-11-27 17:02) [0]

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

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


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

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

В Excel проще.


 
KidMan ©   (2002-11-27 17:04) [2]

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


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

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

var WB: OleVariant;

...

WB:= WordDocument.Content;

....

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

...



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

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

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


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

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


 
KidMan ©   (2002-11-27 17:31) [6]

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

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


 
TTCustomDelphiMaster ©   (2002-11-27 17:54) [7]

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


 
KidMan ©   (2002-11-27 18:13) [8]

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


 
KidMan ©   (2002-11-27 19:39) [9]

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


 
KidMan ©   (2002-11-28 07:39) [10]

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


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

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


 
KidMan ©   (2002-11-28 11:19) [12]

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


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

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

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

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 13:03) [14]

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



Страницы: 1 вся ветка

Текущий архив: 2002.12.09;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.014 c
4-28354
Nikolas SHmuS
2002-10-27 12:36
2002.12.09
NetMessageBufferSend


6-28164
PDV
2002-10-14 13:42
2002.12.09
Такая ситуация...


7-28304
Lex
2002-10-06 20:38
2002.12.09
Возможно ли выключить/перезагрузить комп по сетке?


4-28330
sen
2002-10-24 15:17
2002.12.09
Не обновляется иконка


3-27836
SashaL
2002-11-20 09:37
2002.12.09
Апгрейд MS SQL Server и Delphi.