Ошибка при сохранении jpeg файла

← →
alextov (2004-03-31 16:38) [0]

При попытке выполнить следующий код (практически один в один содраный из хелпа),

jp := TJpegImage.Create;
with jp do begin
Assign(Image1.Picture.Bitmap);
SaveToFile("Img.jpg");
end;
end;

на операторе SaveToFile(), вываливается ошибка типа "Project raised exception class EJPEG with message "JPEG error #36" ".

Подскажите если кто знает, в чем прикол или хотя бы что за "ошибка №36"...

← →
Ega23 © (2004-03-31 16:49) [1]

Попробуй без with

← →
alextov (2004-03-31 17:31) [2]

без width то же самое

← →
Ega23 © (2004-03-31 17:36) [3]

var
FaceBitMap : TBitmap;

procedure TFPreviewPhoto.bbOKClick(Sender: TObject);
var
JpgImg:TJpegImage;
begin
JpgImg:=TJpegImage.Create;
JpgImg.Assign(FaceBitMap);
JpgImg.SaveToFile(ExtractFilePath(ParamStr(0))+"FaceImg.jpg");
JpgImg.Free;
JpgImg:=nil;
ModalResult:=mrOK;
end;

Всё это прекрасно работает

← →
alextov (2004-03-31 17:44) [4]

Отож - бо...:(((

← →
Ega23 © (2004-03-31 17:48) [5]

В SaveToFile попробуй конкретный путь указать

← →
alextov (2004-03-31 18:02) [6]

пробовал - не помогает

← →
Smithson © (2004-03-31 18:05) [7]

И не дергайся. У меня в D5 тоже не сохраняет jpeg. Есть такая библиотека, зовется GFX. Если сумеешь найти, используй ее (я использую).

Еще я что-то делал на тему SaveToStream - попробуй это, только вот не помню, с GFX я это делал или без. Извини, давно было :)

У меня тоже D5. Эта программка уже почти 3 года на объектах разных крутится, и всё отлично.
Кстати, может Delphi непатченый?

← →
alextov (2004-04-01 11:43) [9]

Непатченый, а надо..?

Ну вообще-то патч имеется...
Хотя с jpeg-ом у меня из без патча работало...
Просто не знаю, что ещё предположить.

Ошибка при сохранении jpeg файла Найти похожие ветки