Цитата:
Сообщение от RSLoader
Если с ресурсами, то можно так:
Создай в блокноте файл, например, C:\PECYPC.RC, в котором укажи все картинки, которые хочешь воткнуть в ресурс:
KARTINKA BMPFILE адрествоейкартинки
Чтобы откомпилировать его в ресурс, набери в командной строке:
brcc32 C:\PECYPC.RC
Получишь файл C:\PECYPC.RES
Чтобы пользовать его, напиши в тексте программы {$R C:\PECYPC.RES}
Ну а дальше разберёшься:
Код:
implementation
{$R *.DFM}
{$R C:\PECYPC.RES}
procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
begin
ComboBox1.Style:=csOwnerDrawFixed;
ComboBox1.Canvas.Fillrect(Rect);
ComboBox1.Canvas.Draw(Rect.Left,Rect.Top,Image1.Picture.Graphic);
ComboBox1.Canvas.TextOut(Rect.Left+Image1.Picture.Width,Rect.Top,ComboBox1.Items[Index]);
end;
procedure TForm1.FormCreate(Sender: TObject);
var
Res:TResourceStream;
begin
Res:=TResourceStream.Create(HInstance,'KARTINKA','BMPFILE');
Res.SavetoFile('KARTINKA.BMP');
Res.Free;
Image1.Picture.LoadFromFile('KARTINKA.BMP');
ComboBox1.ItemHeight:=Image1.Picture.Height;
end;
|
Это конечно хорошо что используются BMP, однако их размер огромен относительно JPG. Я делал прогу которая использует ресурс БитМапы из Dll, но от BMP эта Dll раздулась. И очень хотелось бы получить кодинг набросок, в котором описывается загрузка JPG рисунков из ресурсов (Ресурс может находиться в *.Dll или в *.exe). И главное как загнать в ресурс Jpg, *.Bmp и *.Ico сам могу загонять и извлекать(только из Ехе`шника непробывал их извлекать). Ответы на
Мыло.