Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.07.30;
Скачать: [xml.tar.bz2];

Вниз

Можно ли в заголовок Dbgrid поместить картинку.   Найти похожие ветки 

 
Crazy monkey   (2006-07-11 14:44) [0]

Т.е вместо текста необходимо установить картинку. Нечто подобное есть в Outloke, там где в заголовке указан не текст, а рисунок скрепки.


 
AbrosimovA ©   (2006-07-11 15:04) [1]

type
 TDBGrid = class(DBGrids.TDBGrid)
 protected
   // Переопределяем метод отрисовки ячейки
   procedure DrawCell(ACol, ARow: Longint; ARect: TRect; AState: TGridDrawState); override;
 end;

procedure TDBGrid.DrawCell(ACol, ARow: Longint; ARect: TRect; AState: TGridDrawState);
var dR,dT: integer;
begin
 inherited;
 //Отступ от правого края заголовка
 dR:=ImageList1.Width+4;
 //Отступ от верхнего края заголовка
 dT:= ((ARect.Bottom - ARect.Top)-ImageList1.Height) div 2 + 1;
 if (gdFixed in AState) and (ACol=2)  then begin //если 3-й столбец
  //рисуем
  ImageList1.Draw(Canvas, ARect.Right-dR, ARect.Top+dT, 0);
 end;
end;


 
Tornado ©   (2006-07-11 16:43) [2]

ExLib тебе помжет гораздо проше


 
AbrosimovA ©   (2006-07-11 16:52) [3]


> Tornado ©   (11.07.06 16:43) [2]
> ExLib тебе помжет гораздо проше


В чём-же простота? ExLib надо ставить, изучать долго мануалы и наконец настраивать.


 
Crazy monkey   (2006-07-11 17:23) [4]


> ExLib тебе помжет гораздо проше


Точно ExLib? Я просто пользуюсь Ehlib и соответсвенно компонентом DBGrideh.

Можно ли в DBGrideh через Object Inspector вставить картинку в заголовок?
Заранее спасибо!


 
Amoeba ©   (2006-07-11 17:38) [5]

Обрати внимание у колонки Grid"а на св-во Title.ImageIndex.

Specifies an image for the title.

property ImageIndex: Integer;

Description

Use ImageIndex to get or set the index of an image to be drawn in the title. This index identifies an image from the TitleImages property of the DBGridEh control that contains the columns. Specify -1 to prevent an image from being drawn.

When ImageIndex <> -1 title don"t show caption. Title can not show image and caption simultaneously.


 
Crazy monkey   (2006-07-11 17:46) [6]

2 Amoeba ©

Спасибо!


 
Crazy monkey   (2006-07-11 17:47) [7]

2 AbrosimovA ©

Спасибо за код!



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

Форум: "Начинающим";
Текущий архив: 2006.07.30;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.013 c
2-1152179578
Crazy monkey
2006-07-06 13:52
2006.07.30
Как добавить данные в dblistbox?


15-1151568411
Джо
2006-06-29 12:06
2006.07.30
ROR на MIDletPascal или Java(J2ME)


1-1150292191
Megabyte
2006-06-14 17:36
2006.07.30
Изменение формата ячеек Экселя в Дельфи


3-1148563915
_RusLAN
2006-05-25 17:31
2006.07.30
Связка TIBQuery + TDBGridEh + TUpdateSQLW. Подправить даные.


4-1144682201
Ромка
2006-04-10 19:16
2006.07.30
Периоды времени мельше 1 милисекунды





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский