[Delphi] ImageList & Image

0

Witam dzisiaj po raz 2.
Nie wie ktos jak mozna zrobic cos takiego: mam na formie Image1, Image2 i Button1. Chce dla zdarzenie ButtonOnClick wrzucic obrazek z Image1 do ImageList1 a pozniej zaladowac ten obrazek z ImageList do Image2.
P. S. Mam nadzieje, ze dobrze wytlumaczylem.--Delphi vs. Visual C++ = ?:?

0

var
Nr : Integer;
begin
ImageList1.Masked := False;
ImageList1.Height := Image1.Picture.Bitmap.Height;
ImageList1.Width := Image1.Picture.Bitmap.Width;
Nr := ImageList1.Add(Image1.Picture.Bitmap, nil);
ImageList1.Draw(Image2.Canvas, 0, 0, Nr);
end;
--Jest jeszcze jeden błąd ... :)

Apel: Piszcie w tematach o jaki język programowania chodzi np. : [Delphi], [C++], itp.

Prośba o pomoc do Delphi po polsku. Oceniajcie i dodawajcie komentarze
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=18659

Oficjalny kanał IRC serwisu 4programers:
serwer: warszawa.ircnet.pl sieć: POLNet kanał: #4programmers.net

1 użytkowników online, w tym zalogowanych: 0, gości: 1