Скачать: CL | DM;

Подскажите где найти компонент   Найти похожие ветки 

← →
leonidus ©   (2007-09-17 23:58) [0]

Господа, подскажите пожалуйста где найти компонент, пусть даже платный, для быстрого отображения превьюшек фотографий как это делает ACDSee? Все то видел либо тормозит лобо просто нечто убогое, а хочется именно приятный и быстрый компонент.

---

← →
Andy BitOff ©   (2007-09-18 00:01) [1]

GDI+

---

← →
Andy BitOff ©   (2007-09-18 00:20) [2]


function FastFileThumbnail(const FileName: string; const ThumbWidth, ThumbHeight: Integer): TBitmap;
var
 Graphics: TGPGraphics;
 Image, pThumbnail: TGPImage;
 ZoomFactor: Extended;
 W, H: Integer;
begin
 Result := TBitmap.Create;
 Result.Canvas.Lock;

 pThumbnail := nil;
 Image := TGPImage.Create(FileName);
 try
   W := Image.GetWidth;
   H := Image.GetHeight;
   if (W = 0) or (H = 0) then Exit;

   ZoomFactor := Min(ThumbWidth / W, ThumbHeight / H);
   if ZoomFactor >= 1 then ZoomFactor := 1;
   Result.Width := Trunc(W * ZoomFactor);
   Result.Height := Trunc(H * ZoomFactor);

   Graphics := TGPGraphics.Create(Result.Canvas.Handle);
   try
     pThumbnail := Image.GetThumbnailImage(Result.Width, Result.Height, nil, nil);
     Graphics.DrawImage(pThumbnail, 0, 0, pThumbnail.GetWidth, pThumbnail.GetHeight);
   finally
     Graphics.Free;
   end;
 finally
   Image.Free;
   pThumbnail.Free;
 end;
 Result.Canvas.Unlock;
end;


---

← →
leonidus ©   (2007-09-18 19:40) [3]

у меня проблема в в том что бы быстро создать превьюшку, а чтобы расположить их на форме в рамках данного компонента и иметь к ним удобный доступ.

---

← →
homm ©   (2007-09-18 20:05) [4]

> [1] Andy BitOff ©   (18.09.07 00:01)
> GDI+

Сказано же, быстрый ;)

---

← →
Rouse_ ©   (2007-09-18 20:43) [5]

> homm ©   (18.09.07 20:05) [4]
> Сказано же, быстрый ;)

У тебя есть пример, который работает быстрее? ;)

---

← →
atruhin ©   (2007-09-19 14:16) [6]

Посмотри EasyListView, бесплатный, и если я правильно понял задачу,
то именно для этого.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c