Delphi: obrazki w StringGrid

[skolem]

Nie czuje sie niestety zbyt mocno w Delphi... Czy moze mi ktos poradzic, jak
wstawic obrazek w wybrana komorke stringgrida? Ewentualnie jakas wskazowka...
(jesli odeslanie do helpa to szczegolowe :) )
Trzeba uzyc sg.Object[cos]?
Dzieki za kazda pomoc

[alsor]

StringGrig to taka tabelka stringów a nie obrazków,
a nazwa tego tworku ujawnia to dość dokładnie.
Objects[] - możesz sobie tam umieszczać te obrazki lub cokolwiek,
ale StringGrid do tego nie zagląda, i wcale go nie interesuje co tam jest.

[negevmc]

skolem napisała:

> Nie czuje sie niestety zbyt mocno w Delphi... Czy moze mi ktos poradzic, jak
> wstawic obrazek w wybrana komorke stringgrida? Ewentualnie jakas wskazowka...
> (jesli odeslanie do helpa to szczegolowe :) )
> Trzeba uzyc sg.Object[cos]?
> Dzieki za kazda pomoc

W implementacja OnDrawCell TStringGrid'a
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
var
oImg: TBitMap;
begin

// wyświetla obrazek tylko w 3 kolumnie
if ACol = 2 then
begin

oImg := TBitMap.Create;

// to jest TImageList, tam w "design time" ładujesz ile chcesz różnych
// obrazków. Tutaj je "wyciągasz" - trzeci obrazek wchodzi do oImg
ImageList1.GetBitmap(2, oImg);

// wyśwlietla obrazek tak aby zawsze pasował to komurki grid'a
TStringGrid(Sender).Canvas.StretchDraw(Rect, oImg);

// ot i wszystko ;-)
oImg.Free;

end; // if ACol = 2 then

end;


Pozdrawaim

Dzieki!!!

[skolem]

Wielkie dzieki za tresciwa odpowiedz
Uff udalo mi sie zaliczyc ten projekt :)