| imho.ws |
![]() |
|
|
|
# 3 |
|
Guest
Сообщения: n/a
|
PrintForm к сожалению не совсем та команда , которая нужна.
Дело в том, что мне не нужно печатать всю форму со всеми ее кнопками лэйблами и прочими наворотами. Мне нужно распечатать только саму FlexGrid... и более ничего. К тому же Print Form позволяет распечатать только то, что видно на экране. А мне нужно и то, что под скроллингом. Табличка то не на одну страницу получается. Спасибо тебе, SAPER, что не оставил мой вопрос без внимания. С уважением, Lavalit. |
|
|
# 4 |
|
::VIP::
Регистрация: 17.12.2002
Адрес: Q-ata, Israel
Сообщения: 310
![]() ![]() ![]() ![]() ![]() |
Если не помог - за что спасибо ?
Печатать надо в цвете или только текст ? Если текст - достань его по ячейкам из TextMatrix Или сразу всё из Clip: Код:
flexG.Row = 0 flexG.Col = 0 flexG.RowSel = flexG.Rows - 1 flexG.ColSel = flexG.Cols - 1 Clipboard.SetText flexG.Clip, vbCFText MsgBox Clipboard.GetText |
|
|
|
|
# 5 |
|
Guest
Сообщения: n/a
|
Цвет не принципиален, потому как принтер все равно ч\б.
А вот саму сеточку конечно же не помешало бы. Из CLIPа пробовал уже, но текст несколько искажается. Если в таблице одни цифири, да еще и одинаковой разрядности, то еще прилично получается, даже без сеточки. А вот если в ячейках содержится текст, да еще и разной длинны.... То тут то и получаются разные сдвиги вправо-влево и как результат не совсем удобно читается. Конечно логично было бы выгрузить все это безобразие в EXEL, но уж больно не хочется связываться с ним. Потому как подозреваю, что при замене того же EXELя, придется перекомпилировать всю прогу из за библиотек. Спасибо за внимание в любом случае. ))) Одно только желание помочь уже достойно благодарности. С уважением, Lavalit |