![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
помогите с компонентом [D7, WinXP]
dron9999 © (2009-02-25 21:02:00)Привет всем такая проблема я не знаю как разобраться с компонентом JpegObj.pas читал RM но Егорры кароч такие
сократил! что делать подскажите !
[Error] MainUnit.pas(15): $IFEND expected but $ENDIF found
PegObj.pas(918): File not found: 'JPegObj\jcmainct.obj'
[Error] JPegObj.pas(919): File not found: 'JPegObj\jcprepct.obj'
[Error] JPegObj.pas(920): File not found: 'JPegObj\jccoefct.obj'
[Error] JPegObj.pas(921): File not found: 'JPegObj\jccolor.obj'
[Error] JPegObj.pas(922): File not found: 'JPegObj\jcsample.obj'
[Error] JPegObj.pas(923): File not found: 'JPegObj\jcdctmgr.obj'
[Error] JPegObj.pas(924): File not found: 'JPegObj\jcphuff.obj'
[Error] JPegObj.pas(944): Unsatisfied forward or external declaration: 'jpeg_finish_compress'
[Fatal Error] MainUnit.pas(117): Could not compile used unit 'JPegObj.pas'
dron9999 (2009-02-26 21:26:00) [1]TJpegImage -у меня его нет =( где достать ???
dron9999 (2009-02-26 19:17:00) [2]Как переделать из .bmp в jpg в { KOL }
Вот мой код я получаю .bmp но вес у него оч большой !!!
Пожалуйста помогите решить эту проблему !!!!
использую JPegObj
===================================
var
Filename: String;
Bmp: PBitmap;
ScreenDC: HDC;
Format: TPixelFormat;
begin
if ParamCount<1 then
begin
FileName:=Paramstr(0);
delete(FileName,Length(FileName)-3,4);
FileName:='_.bmp'
end else
FileName:=Paramstr(1);
ScreenDC := GetDC( 0 );
case GetDeviceCaps( ScreenDC, BITSPIXEL ) of
1, 4, 8, 15, 16: Format := pf16bit;
else {24, 32:} Format := pf24bit;
end;
Bmp := NewDIBBitmap( R.Right - R.Left, R.Bottom - R.Top, Format );
BitBlt( Bmp.Canvas.Handle, 0, 0, Bmp.Width, Bmp.Height, ScreenDC, R.Left, R.Top, SRCCOPY );
ReleaseDC( 0, ScreenDC );
bmp.free;
end;
end;
MBo (2009-02-26 09:18:00) [3]ну есть же TJpegImage в стандартной поставке
dron9999 (2009-02-26 09:12:00) [4]Да все разобрался ! ..
Он для работы с файлами *.Jpg *.bmp
MBo (2009-02-26 08:59:00) [5]Что это за "компонент", и зачем с ним нужно разбираться?