|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
DbGridEH нумерация строк при печати
Здравствуйте. Помогите сделать отчёт с нумерацией строк.
Сейчас это выглядит так Отчёт формируется так: Код:
... PrinterPreview.Previewer.ViewMode:=vm150; PrintDBGridEh_orgastat.Preview; ... Свойство грида ShowRecNo=true но в отчёт нумерация не попадает: Если можно поделитесь правильным кодом или наведите на путь истинный. Спасибо. Последний раз редактировалось gebs, 04.04.2011 в 12:15. |
#2
|
||||
|
||||
Я бы не стал придумывать велосипед а использовал бы готовые построители отчетов например FastReports или RaveReports.
|
#3
|
|||
|
|||
Цитата:
Но: на событии OnGetCellParams в новом созданном столбце делаем: Код:
... if (DataModule10.MyQ_orgstat.RecNo > 0) then Params.Text:= IntToStr(DataModule10.MyQ_orgstat.RecNo); ... При этом в отчёте появляется нумерация в вгриде нет. Я так понимаю надо на событии в гриде OnDrowDataCell что-то сделать... |
#4
|
||||
|
||||
Цитата:
|
#5
|
|||
|
|||
Цитата:
|
#6
|
||||
|
||||
в гриде... можно конечно использовать DrawColumnCell. и в нем чисто recNo отрисовывать. Но этот фокус прокатит, если у тебя таблица будет выводится в чистом виде, без всяких фильтров, т.к. может получиться такое
............ 1 2 3 4 10 11 55 56 57 |
#7
|
|||
|
|||
Цитата:
Фильтры не планируется использовать, может кто поделится примером кода для DrawColumnCell? |
#8
|
||||
|
||||
в гриде создаешь столбец в котором у тебя будет нумерация. И обзываешь (свойство Title ) его например №п.п.
далеев DrawColumnCell прописываешь Код:
if Column.Title.Caption='№п.п.' then begin DbGrid.Canvas.FillRect(rect); DbGrid.Canvas.TextOut(rect.Left,rect.Top,Inttostr(DbGrid.DataSource.DataSet.RecNo)); end else DbGrid.DefaultDrawColumnCell(rect,datacol,column,state); и не забудь свойство грида DefaultDrawing =false постаить |
#9
|
|||
|
|||
А можно в набор добавить вычесляемое поле еще...
Новый вирус - "БОМЖ"! Он просто роется в Корзине...и спит под ярлычком "Сетевое окружение" |
#10
|
||||
|
||||
Цитата:
|