Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как КОРРЕКТНО разместить картинку в DBGRID-е ??? [D6, Paradox]


officeman ©   (2002-10-09 22:26:00) 

Уважаемые Мастера!

Правим событие:

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if datacol=0 then
begin
DBGrid1.Canvas.Draw(Rect.Top,Rect.top,Image1.Picture.Graphic);
end;
end;
end.

При этом картинка добавляется, без проблем.
Все картинки одинакового размера(64x64)

ВНИМАНИЕ ВОПРОС=============>>>>>>>>>>>>>>>>
Как сделать так, чтобы ВСЕ ЯЧЕЙКИ таблицы приняли форму размещённых в них КАРТИНОК ???????
так как картинки все одинаковые, долна получится сетка из одинаковых квадратов с картинками....

надеюсь вы поняли о чём это я....

с Уважением, OfficeMan


ЮЮ   (2002-10-10 03:16:00) [1]

Если бы это был не DBGrid, а DrawGrid или StringGrid, у которых есть доступ к RowHeights, ColumnWidth - то это делается без проблем. B DBGrid всё это устанавливается изнутри. Для изменеия штрины столбцов используй DBGrid.Columns[].Width. А высоту - изменяя DBGrid.Font.Height.


Наверх

Титульная страница Поиск, карта сайта Написать письмо