Delphi-Quellcode:
procedure TForm1.BitBtn1Click(Sender: TObject);
var
Bmp: TBitmap;
begin
Bmp := TBitmap.Create();
try
if ImageList1.GetBitmap(0, Bmp) then
BitBtn1.Glyph.Assign(Bmp);
finally
Bmp.Free;
end;
end;
so steht es da, aber kann mir den code wer erklären?. wie gesagt ich mach das ganze noch nicht lang und frag mich wieso das bild in eine variable muss wenn es doch einfacher gehen muss.....einfach aus der timagelist laden oder nicht? Und wieso ist 2 mal end; da wenn nur einmal begin auftaucht? und noch eine frage
meine timagelist spinnt irgendwie, egal welches bild ich einfüge der rechte rand(1 pxl) fehlt immerobwohl das bild ganz ist, weiss wer den grund?