Конференция VBStreets

**Sirik** » 18.11.2004 (Чт) 14:06

Как напечатать содержимое данного компонента?

**Konst_One** » 18.11.2004 (Чт) 14:19

Код: Выделить всё: GRD.BackColorFixed = vbWhite GRD.PictureType = flexPictureMonochrome Printer.Print "" Printer.PaintPicture GRD.Picture,0,0 Printer.EndDoc

**Ennor** » 18.11.2004 (Чт) 14:22

2 Konst_One: Издеваешься, да?..

**Sirik** » 18.11.2004 (Чт) 14:40

Наверное да!

У меня табличка заполненна цветными ячейками

**Konst_One** » 18.11.2004 (Чт) 14:42

я взял готовый кусок кода и тебе кинул, если нужно печатать в цвете, то убери выбор монохромности и заливки белым фиксированных ячеек

**Konst_One** » 18.11.2004 (Чт) 14:45

2 Ennor: если простенький грид и влазит на страничку, то вполне ничего

а по-хорошему конечно нужно построчно все выводить и на страницы делить при печати. щас посмотрю, у меня где-то код завалялся подобный

**Konst_One** » 18.11.2004 (Чт) 14:48

вот что-то подобное:

**Sirik** » 18.11.2004 (Чт) 15:07

Да пример отличный.
Но что-то я не нашёл как закрашивать ячейки и поменять ориентацию страницы на горизонтальную

**Konst_One** » 18.11.2004 (Чт) 15:25

сам немного подумай, а то может за тебя программу написать

**Sirik** » 18.11.2004 (Чт) 15:35

Konst_One писал(а):сам немного подумай, а то может за тебя программу написать

Нет, прогу я сам допишу.
Просто думал что ты можешь чуть-чуть помощь

**Konst_One** » 18.11.2004 (Чт) 16:06

поищи по форуму , уже было раньше на счет смены ориентации принтера

**Sirik** » 18.11.2004 (Чт) 16:08

Konst_One писал(а):поищи по форуму , уже было раньше на счет смены ориентации принтера

На счёт ориентациия я знаю

**Ennor** » 18.11.2004 (Чт) 20:50

На моей прошлой работе чувак написал библу для печати флексов, листвью и TDBGrid на основе того Print Preview, которое есть в последнем контроле. Но он, собака, денег стоит, и некислых... По-другому не получилось.

Конференция VBStreets

Печать FlexGrid

Печать FlexGrid

Кто сейчас на конференции