Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.21;
Скачать: CL | DM;

Вниз

Конвертирование bmp в jpeg   Найти похожие ветки 

 
VlNek   (2002-01-04 18:00) [0]

Как перевести из bmp в jpeg, чтобы работало свойство transparent в компоненте Image


 
Андрей Сенченко ©   (2002-01-05 10:53) [1]

Перевод BMP в JPG - вот он. Взято из местного FAQ, слегка заточено под себя.
PROGRAM bmptojpg;

USES
Windows, Graphics, JPEG;

VAR
JPGpic: TJPEGImage;
BMPpic: TBitmap;
BMPName, JPGName : string;

BEGIN
If ParamCount = 2
Then
Begin
BMPName := ParamStr(1);
JPGName := ParamStr(2);
JPGpic := TJPEGImage.Create;
BMPpic := TBitmap.Create;
Try
BMPpic.LoadFromFile(BMPName);
JPGpic.Assign(BMPpic);
JPGpic.SaveToFile(JPGName);
Finally
JPGpic.Free;
BMPpic.Free;
End { Try }
End { Then }
Else
MessageBox(0,PChar("Необходимо запускать эту программу"+#13+"с параметрами :"+#13+"Имя файла.bmp Имя файла.jpg"),PChar("Внимание !"),MB_OK+MB_ICONSTOP);
END.


C Tranparent не пробовал, но по-моему проблем быть не должно



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

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

Наверх




Память: 0.46 MB
Время: 0.008 c
3-66223
dim-
2001-12-17 17:48
2002.01.21
Имена индексов


6-66325
jk
2001-10-29 11:46
2002.01.21
Как програмно поменять default gateway в WinNT/2K


6-66333
Talgat
2001-10-21 21:58
2002.01.21
SMPP(Short Message Peer to Peer)


1-66289
LAlex
2002-01-04 18:38
2002.01.21
Искуственный интеллект


3-66192
Don`t know!
2001-12-18 10:11
2002.01.21
Как Bitmap-из Image1 записать в blob-поле Table1