Ĺadny brzuch
Witam. O to kod na pokazanie ikony wybranego pliku w TImage:
Icon := TIcon.Create; try SHGetFileInfo(PChar(Edit1.Text), 0, FileInfo, SizeOf(FileInfo), SHGFI_ICON); icon.Handle := FileInfo.hIcon; Image1.Picture.Icon.Assign(Icon); finally Icon.Free;
Tylko że to ustawia automatycznie domyślną wielkość ikony, przez co rozmiary się trochę różnią (tak mi się zdaje). Jak 'SizeOf(FileInfo)' ustawić na wskazana przeze mnie wielkość?
Tylko że to ustawia automatycznie domyślną wielkość ikony, przez co rozmiary się trochę różnią (tak mi się zdaje). Jak 'SizeOf(FileInfo)' ustawić na wskazana przeze mnie wielkość?
SizeOf podaje Ci rozmiar zmiennej / rekordu jaki zajmuje w pamięci... więc co ma piernik ... ?
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Icon := TIcon.Create; try SHGetFileInfo(PChar(Edit1.Text), 0, FileInfo, SizeOf(FileInfo), SHGFI_ICON); icon.Handle := FileInfo.hIcon; Image1.Picture.Icon.Assign(Icon); finally Icon.Free;
Tylko że to ustawia automatycznie domyślną wielkość ikony, przez co rozmiary się trochę różnią (tak mi się zdaje). Jak 'SizeOf(FileInfo)' ustawić na wskazana przeze mnie wielkość?
Tylko że to ustawia automatycznie domyślną wielkość ikony, przez co rozmiary się trochę różnią (tak mi się zdaje). Jak 'SizeOf(FileInfo)' ustawić na wskazana przeze mnie wielkość?
SizeOf podaje Ci rozmiar zmiennej / rekordu jaki zajmuje w pamięci... więc co ma piernik ... ?