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

Вниз

Как StringGrid отправить в Word?   Найти похожие ветки 

 
ret_Avr   (2002-11-24 19:43) [0]

Подскажите, кто знает, как StringGrid отправить в Word?
Текст могу, а таблицу нет :(


 
MBo ©   (2002-11-24 19:52) [1]

http://www.lmc-mediaagentur.de/dpool/tips/1256.htm


 
alvin   (2002-11-27 08:55) [2]

tabls:=aRange.Tables;
// добавляем новую таблицу размером 5 на 5
tabl:=tabls.Add(arange,StringGrid1.RowCount,4);
// в цикле
///////////////////////////////////////////////////////////////
for i:=0 to StringGrid1.RowCount-1 do begin
// задаем ширину 1-й ячейки
tabl.Cell(i+1,1).Width:=50;
//читаешь значение и stringgrig
tabl.Cell(i+1,1).Range.Text:=StringGrid1.Cells[0,i];
// задаем ширину 2-й ячейки и т.д.
tabl.Cell(i+1,2).Width:=150;
tabl.Cell(i+1,2).Range.Text:=StringGrid1.Cells[1,i];
tabl.Cell(i+1,3).Width:=170;
tabl.Cell(i+1,3).Range.Text:=StringGrid1.Cells[2,i];
tabl.Cell(i+1,4).Width:=80;
tabl.Cell(i+1,4).Range.Text:=StringGrid1.Cells[3,i];

end;



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

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

Наверх




Память: 0.46 MB
Время: 0.026 c
3-14376
nikolo
2002-11-19 18:27
2002.12.05
ADO: TParameters.CreateParameter


14-14761
New NoNaMe
2002-11-14 16:12
2002.12.05
Сказка о зайце.


14-14800
Cu
2002-11-15 11:26
2002.12.05
Система контроля версий объектов БД


14-14783
Fiend
2002-11-15 09:21
2002.12.05
День радио телевидения и связи


4-14885
Me2
2002-10-23 10:06
2002.12.05
SendMessage для Edit