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

Проблема с жпег в имэйдже.   Найти похожие ветки 

← →
Cr@sh ©   (2002-09-21 09:07) [0]

Мастера, помогите.
Я делаю так:
procedure TForm1.ElPopupButton1Click(Sender: TObject);
begin
image1.Picture.loadfromfile("1.jpg");
end;
Почему он мне выдает ошибку о неправильном формате файла?
Может жпеги по другому грузятся?
Заранее спасибо.

---

← →
AlexT1000   (2002-09-21 13:37) [1]

этот код срабатывает не для всех jpegoв . не знаю почему!

но мы побороли это так

if (AnsiLowerCase(ExtractFileExt(Filename)) = ".jpg" )
or (AnsiLowerCase(ExtractFileExt(Filename)) = ".jpeg" ) then begin
jp := TJpegImage.Create;
try
jp.LoadFromFile(FileName);
Image.Picture.Assign(jp);
finally
jp.Free;
end;
end;

что то вроде этого

---

← →
Cr@sh ©   (2002-09-21 13:53) [2]

Такие-то приколы я и сам знаю... Другое дело, мне надо без создания доп. джепег-имэйджев :(

---

← →
PaRL ©   (2002-09-21 14:54) [3]

Модуль JPEG добавил?

---

← →
Cr@sh ©   (2002-09-21 15:29) [4]

2PaRL
Я вобще-то не совсем ламер:)
Мне просто надо без создания доп. джепег-имэйджев.

---

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

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



Память: 0.45 MB
Время: 0.01 c