Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.03;
Скачать: 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 вся ветка

Текущий архив: 2002.10.03;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
1-7971
cf
2002-09-24 14:26
2002.10.03
desktop


3-7800
Vavan
2002-09-11 21:15
2002.10.03
Помогите чайнику


1-8007
123000
2002-09-21 16:35
2002.10.03
Как включить и выключить комп?


1-7925
tytus
2002-09-23 19:53
2002.10.03
Вторая форма


3-7861
Rule
2002-09-13 01:07
2002.10.03
Помогите пожалуйста, горю. До утра надо сделать!!!!