| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблема с большими Bitmap в Delphi7+KOL [Delphi, Windows]
bobah © (2010-02-17 16:18:00)Помогите пожалуйста разобраться с такой ситуацией: не получается работать с большими BMP (больше 5000х5000 пикселей, 24bpp)
Создаю KOL-проект, на KOL-форму кидаю KOLButton, на клик вешаю
procedure TForm1.Button1Click(Sender: PObj);
var tstBmp:PBitmap;
begin
tstBmp:=NewBitmap(5000,5000);
tstBmp.Canvas.Brush.Color:=clRed;
tstBmp.Canvas.FillRect(tstBmp.BoundsRect);
end;
При клике на кнопку получаю "Runtime erroк 216 at …"
Если уменьшить разрешение все нормально проходит, но этот вариант не подходит.
Так же всё нормально проходит и с таким размером изображения (и с большим разрешением), если после создания Bitmap сохранить его в поток или в файл, т.е.
procedure TForm1.Button1Click(Sender: PObj);работает без ошибок!
var tstBmp:PBitmap;
begin
tstBmp:=NewBitmap(5000,5000);
tstBmp.SaveToFile('tst.bmp');
tstBmp.Canvas.Brush.Color:=clRed;
tstBmp.Canvas.FillRect(tstBmp.BoundsRect);
end;
Что не так делаю? как заставить работать без ненужного сохранения в поток или в файл?
Barloggg (2010-03-05 11:38:00) [1]я кстати с большими битмапами работал. но создавал их своим кодом, причем побайтово. и забацать битмапчик на 50мегов это было делом трех секунд загрузки неслабого процессора.
правда делал я его трансректально - писал в памяти (memorystream) файл в формате bmpфайла, потом создавал newBitmap и загружал его из этой памяти (bmp.loadfromstream)
и на экран выводился штатно.
да, мне тоже не очень нравилась эта двойная запись/загрузка но руки так и не дошли до оптимизации. оказывается по пути зарыты грабли. спасибо.
Barloggg (2010-02-19 11:11:00) [2]как раз-таки fillrect проходит. глюкает при попытке отрисовать.
не на каждом канвасе глючит кстати.
не знаю в чем тут дело, но глюка интересная.
Smile (2010-02-18 22:19:00) [3]Чёт я седня агрессивен:)
Я к тому, что плохо понимаю тягу к "КОЛ".
Уже и не в слишком далеком времени (прошлый век) мы, в качестве внешних носителей информации, использовали флоппи. Сначала 5.25 дюймовые (емкость 1.2 мгб), затем прорыв (условно 3-х дюймовые) емкостью аж 1.457 мгб.
Вот и подумалось, а почему бы сейчас не производить флоппики емкостью, скажем эдак 2.5 мгб, а может даже и поболее.
Собственно по этой причине мне и взгрутнулось при воспоминании КОЛ
Извините
:(
miek (2010-02-18 20:42:00) [4]Работать с БОЛЬШИМИ битмапами стандартными средствами (через GDI) вообще по определению не стоит. Будет большая и совершенно бесполезная нагрузка на память. Решение: MMF+StretchDIB.
Sapersky (2010-02-18 17:27:00) [5]Вероятно, поможет tstBmp.fHandleType := bmDIB (это делается в SaveToFile) или создание через NewDIBBitmap. NewBitmap по умолчанию создаёт DDB-битмап, у которых меньше допустимый размер.
| |
