![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Левый верхний угол сетки mdvXLGrid
dataMaster © (2003-09-15 11:48:00)Всем привет! Кто подскажет, как написать текст в самом верхнем левом углу компонента mdvXLGrid?
dataMaster (2003-09-15 12:28:00) [1]Спасибо.
mdw (2003-09-15 12:16:00) [2]Примерно так:
procedure TMainForm.XLGridDrawTitle(Sender: PControl; ACol, ARow: Integer;
ACell: PmdvXLCell; ACanvas: PCanvas; ARect: TRect; ASelected,
AFocused: Boolean; var Access: Boolean);
begin
if (ACol = -1) and (ARow = -1) then begin
DrawText(ACanvas.Handle, '@', -1, ARect, DT_SINGLELINE or DT_VCENTER or DT_CENTER);
end;
end;