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

Вниз

Нестандартное расширение битмапа   Найти похожие ветки 

 
Scote   (2003-09-14 20:55) [0]

Помогите кто-нибудь, мне для своей проги, где рисунки загружаются из отдельного файла (а не программного битового образа, когда Picture: TBitmap), нужно сделать "защиту от чайника", где графические файлы - обычные битмапы, но с другим расширением. Посредством компонента TImage методом LoadFromFile("битмап.другое_расширение") ничего не выходит, пишет об ошибке (в процессе прогона программы). Так же не надо меня за такой глупый вопрос ругать, я просто Delphi пользуюсь всего два месяца, причём это мой первый язык программирования.


 
Mihey   (2003-09-14 22:38) [1]

Ругать никого не буду, вопрос хороший. Дело в том, что при помощи TImage.LoadFromFile ты ничего не сделаешь, так как это по идее то же самое, что TImage.Picture.LoadFromFile, т.е. метод класса TPicture. Идея класса заключается в том, чтобы загружать самые различные виды графики, от bmp до ico. При этом надо же как-то определять, какого формата загруженные файлы. Это делается простым способом - опознаётся расширения файла. Следовательно, любое неопознаное расширение не проходит.

Но выход есть и как раз в использовании TBitmap. Его LoadFromFile не делает проверки на расширение и грузит из любого правильного bitmap-файла. То есть, ты создаёшь временный TBitmap, грузишь в него файл, присваиваешь это Bitmap свойству TImage.Picture.Bitmap, после чего удаляешь временный объект.


 
MBo   (2003-09-15 06:05) [2]

TPicture.RegisterFileFormat



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

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

Наверх




Память: 0.44 MB
Время: 0.01 c
14-37924
panov
2003-12-17 21:18
2004.01.13
Резалки баннеров


11-37596
Babenko Alexey
2003-04-24 17:09
2004.01.13
ListView + OwnerDraw


6-37833
Passlight
2003-11-10 18:00
2004.01.13
Обработка ошибок в TIdHTTP


14-37926
Rocks
2003-12-17 21:35
2004.01.13
Устройство для переноса данных


7-37958
Артем
2003-10-30 11:41
2004.01.13
Работа с регистром





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