Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.10.2010, 07:22   #1
MaxNik2009
Форумчанин
 
Аватар для MaxNik2009
 
Регистрация: 17.09.2009
Сообщений: 294
По умолчанию tif в bmp

Как можно конвертировать большой файл tif(15000х15000 пикселей) в bmp?
делаю так:
Код:
var
  Tif: TWICImage;
  Bmp: TBitmap;  
begin
    Tif:= TWICImage.Create;
    Bmp:= TBitmap.Create;
    try
       Tif.LoadFromFile('мойФайл.tif');
       Bmp.Assign(Tif);
        bmp.SaveToFile('new.bmp');
    finally
      Bmp.Free;
      Tif.Free;
   end;
end;
файлы размером до 200 Мб обрабатываются нормально, если файл больше то вылетет ошибка о нехватке памяти.
принимаю благодарности в письменном виде( весы слева)...
MaxNik2009 вне форума Ответить с цитированием
Старый 15.10.2010, 08:38   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
если файл больше то вылетет ошибка о нехватке памяти.
А если другой компонент попробовать?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 15.10.2010, 12:06   #3
MaxNik2009
Форумчанин
 
Аватар для MaxNik2009
 
Регистрация: 17.09.2009
Сообщений: 294
По умолчанию

Цитата:
А если другой компонент попробовать?
Например какой?
принимаю благодарности в письменном виде( весы слева)...
MaxNik2009 вне форума Ответить с цитированием
Старый 29.11.2010, 11:01   #4
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Тоже понадобилась информация по этому вопросу. Мне нужно как то загрузить в переменную типа TBiymap файл с расширением TIF, а на выходе получить jpeg максимально возможного минимального размера и без потерия качества. Может кто знает как это можно сделать?
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 29.11.2010, 11:06   #5
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

можешь взять классы с набора GLScene(если что, то там GLBitmap=TBitmap, то есть принцип выйдет как с JPEG)
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 29.11.2010, 11:19   #6
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

У меня нет этого компонента, поэтому не опробовать.
А предложение такое - попробовать использовать вместо Bmp: TBitmap; -> Bmp: TImage;
mihali4 вне форума Ответить с цитированием
Старый 10.05.2011, 14:06   #7
blazonic
Videor venisse
Пользователь
 
Регистрация: 23.03.2010
Сообщений: 58
По умолчанию

Цитата:
Сообщение от MaxNik2009 Посмотреть сообщение
файлы размером до 200 Мб обрабатываются нормально, если файл больше то вылетет ошибка о нехватке памяти.
Хочу обратить внимание на основные моменты, что tif это формат с большой глубиной цвета, и сохраняет слои.
А что если попробовать перевести формат tif сначала в jpeg, а потом из jpeg в bmp?
Может, тогда файл tif изначально более 200 MB, не будет отъедать столько памяти…
Facimus opus communis
blazonic вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Загрузка BMP в Simple Graph и сохранение в BMP формат artemavd Общие вопросы Delphi 10 02.10.2010 14:19
Из tif в jpg StudentPolitech Софт 17 04.07.2009 19:25
Отображение файлов tif на форме AlexandrSid Общие вопросы Delphi 7 28.05.2009 16:15
программно из *.tif to *.jpg Abbatik Помощь студентам 1 20.02.2008 23:55
Какой компонентой можно загрузить Tif RafKil Общие вопросы Delphi 0 30.03.2007 08:12