Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.11;
Скачать: CL | DM;

Вниз

Таблица с картинками!   Найти похожие ветки 

 
serko   (2005-06-16 14:05) [0]

Ув. Мастера подскажите как сделать чтобы в ячейках таблицы Stringgrid или Drawgrid (незнаю в каком лудше) были картинки, загружаемые из файла?
Все ответившим большое спасиба!


 
Алхимик ©   (2005-06-16 14:16) [1]

В обработчике события OnDrawCell рисовать ручками.


 
serko   (2005-06-16 14:22) [2]

А примерчик можна? Пожалуйста!


 
Алхимик ©   (2005-06-16 14:41) [3]

procedure TForm1.DrawGrid1DrawCell(Sender : TObject; ACol, ARow : Integer;
  Rect : TRect; State : TGridDrawState);
begin
  with TDrawGrid(Sender) do
     Canvas.Draw(Rect.Left,Rect.Top, bmp);
end;


 
Алхимик ©   (2005-06-16 14:52) [4]

bmp - соответственно некий экземпляр типа TBitmap, созданый заранее и загруженный картинкой.


 
serko   (2005-06-16 14:57) [5]

А JPEG мона как-то?


 
evvcom ©   (2005-06-16 15:03) [6]

А клавишу F1 жмакать могёшь?


 
Алхимик ©   (2005-06-16 15:05) [7]


>  [5] serko   (16.06.05 14:57)
> А JPEG мона как-то?

Мона, мона.
uses ... , Jpeg;
...
jpg := TJpegImage.Create;
jpg.LoadFromFile("lalala.jpg");
...
procedure TForm1.DrawGrid1DrawCell(Sender : TObject; ACol, ARow : Integer;
 Rect : TRect; State : TGridDrawState);
begin
 with TDrawGrid(Sender) do
    Canvas.Draw(Rect.Left,Rect.Top, jpg);
end;


 
Алхимик ©   (2005-06-16 15:08) [8]


> [6] evvcom ©   (16.06.05 15:03)
> А клавишу F1 жмакать могёшь?

Не парься - челу надо критическую массу набрать, потом чтение хелпа превратится в любимый вид досуга. :)


 
evvcom ©   (2005-06-16 15:10) [9]


> Алхимик ©   (16.06.05 15:05) [7]

Что-то ты сегодня щедрый... Вполне достаточно было:
procedure TCanvas.Draw(X, Y: Integer; Graphic: TGraphic);
TJpegImage = class(TGraphic);


 
serko   (2005-06-16 15:14) [10]

Спасибо!
А как же все это делать для каждой ячейки?


 
Алхимик ©   (2005-06-16 15:22) [11]

Дык этот обработчик и выполнится для каждой ячейки.
А какая конкретно ячейка прорисовывается можно узнать анализируя
параметры ACol, ARow : Integer


 
Crazy_Diman ©   (2005-06-21 15:31) [12]

http://program2006.narod.ru/sad.rar


 
serko   (2005-06-22 23:43) [13]

>> Crazy_Diman ©   (21.06.05 15:31) [12]

Чето при нажатии на кнопку выскакивает ошибка!


 
serko   (2005-06-23 01:33) [14]

>Алхимик ©   (16.06.05 15:22) [11]

т.е. так:
Сначала [1,1], потом [1,2] и т.д.?


 
evvcom ©   (2005-06-23 01:36) [15]


> Сначала [1,1], потом [1,2] и т.д.?

Типа того, только привязываться надо не к 1 и 2, а к ACol и ARow, так как может начаться этот цикл и не с первой строки, и не с первого столбца.


 
serko   (2005-06-23 12:36) [16]

Гы, ну а как тогда если у меня картинки должны быть по порядку (картинки у меня называются 1.jpg, 2.jpg и т.д. т.е. 1-ая ячейка , 2 -ая и т.д.)?

И как сделать Stretch и Proportional для каждой картинки? Ато размеры картинки у меня больше чем ячейка!


 
Crazy_Diman ©   (2005-06-23 13:03) [17]

Тот пример так делает, заходи в чат поговорим



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

Текущий архив: 2005.07.11;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.083 c
14-1118728404
pavel_guzhanov
2005-06-14 09:53
2005.07.11
настройка соединения в opera


9-1111854739
$SerG$
2005-03-26 19:32
2005.07.11
Какие компоненты нужны для создания игр(стратегий)?


5-1089110289
ssk
2004-07-06 14:38
2005.07.11
Наследник от TShape со встроенным таймером


1-1119506247
JetMan
2005-06-23 09:57
2005.07.11
поиск по ListView


14-1118118178
Тульский
2005-06-07 08:22
2005.07.11
Word 2000 во всей красе