i used this code to load images
the listview display sliced images , how to display stretched  image ?

procedure tmainfo.on_create(const sender: TObject);
const
        imgDir = 'imgs/';
var
        img_names : array[0..9] of string = 
('1.png','2.png','3.jpg','4.png','5.png',
                        '6.png','7.png','8.png','9.png','10.png');
    bmp  : tmaskedbitmap;       
    i    : longint;
    item : tlistitem;
begin

        for i:=0 to 9 do begin
          bmp := tmaskedbitmap.create(bmk_rgb);
          bmp.loadfromfile(imgDir+img_names[i]);
          timagelist1.addimage(bmp);
          bmp.free;
        end;
        
    // display  
    timagelist1.beginupdate();
    for i:= 0 to timagelist1.count-1 do begin
      item:= tlistitem.create();
      item.imagenr:= i;
      tlistview1.itemlist.add(item);
    end;
    timagelist1.endupdate();
end;
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Reply via email to