Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.21;
Скачать: [xml.tar.bz2];

Вниз

Конвертирование 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.54 MB
Время: 0.013 c
6-66328
evgen32
2001-10-29 08:56
2002.01.21
дата и время


7-66380
Lizard
2001-09-30 14:03
2002.01.21
Как к письму приаттачить не один, а несколько файлов ?


4-66408
YUS
2001-11-21 20:52
2002.01.21
CreateDialog -????


3-66177
NewComer
2001-12-17 12:18
2002.01.21
Помогите разобраться с FastReport 2.44


6-66318
lun
2001-10-26 09:17
2002.01.21
Поделитесь исходниками прокси! пожалуйста!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский