Главная страница
    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.75 MB
Время: 4.246 c
3-66213
PONTIY
2001-12-19 06:54
2002.01.21
Работа с курсором


7-66377
Sirgo
2001-10-07 13:51
2002.01.21
Температура процесора и системы


1-66273
StelZ
2002-01-03 16:51
2002.01.21
Убор из Task Bar-а


1-66276
BigLamer
2002-01-04 12:57
2002.01.21
Почему Delphi делит не верно?


3-66216
Kaster
2001-12-18 21:12
2002.01.21
Помогите пожайлуста! Мне надо, чтобы после поиска, найденная запись стала первой в DBGrid е!





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский