|
Как подгружать JPG-картинки, но чтобы они быстро отображалисьprocedure TForm1.FormCreate(Sender: TObject);
begin
if Image1.Picture.Graphic is TJPEGImage then
begin
TJPEGImage(Image1.Picture.Graphic).DIBNeeded;
end;
end;
Данный код заставляет явно и сразу декодировать jpeg, вместо того, чтобы
делать это при отображении картинки
Название: Как подгружать JPG-картинки, но чтобы они быстро отображались Дата публикации: 2004-08-30 (3296 Прочтено) |
|
 |