открыть большой графический файл побитно

[Rin]

Это неоптимальный вариант. Гораздо быстрее будет читать, начиная с начала.

С этим я согласен.
Я лишь показал, как перейти на первый байт изображения, не считывая смещение, и не зная, есть палитра или нет. Без разницы как написать так - f.seek(w*h*3,soEnd) или так f.seek(d.size-h*w*3,soBeginning).
Палитру в изображении с 24-байтном формате пикселя не видел, т.к. не часто приходится разбирать BMP ручками.

[s-andriano]

На мой взгляд, вероятность, что кто-то что-то допишет к концу файла (кажется, здесь недавно обсуждалось, как можно запихнуть архив в картинку, и пришли к выводу, что просто дописывая zip в конец файла), ничуть не меньше, чем обнаружить палитру в труколорном изображении.

А я, наоборот, предпочитаю работать с BMP ручками. Притом, не только, когда читаю файл, но и когда сам генерирую то или иное изображение.

PS. Да, еще лишние хвосты у файлов получаются после восстановления при крахе винчестера. В общем, отсчитывать от конца файла ненадежно.

[Rin]

кажется, здесь недавно обсуждалось, как можно запихнуть архив в картинку, и пришли к выводу, что просто дописывая zip в конец файла

Вот про этот случай я и упоминал. Там был формат jpg, и в APPn нужно было записать архив. Самым простым методом было добавить в конец, т.к. в конце файла стоит маркер, при считывании которого программы просмотра и редактирования изображений завершают работу и показывают картинку.
Но у ТС будут свежеиспеченные снимки, поэтому не думаю, что кто-то успеет залить в конец файла что-то свое.

[FoggySpurs]

Так Можно увидеть окончательно работающий код? не один из здесь приведенныйх не работает( Желательно использовать TFilestream и задать палитру.Код должен работать с ЛЮБЫМ бмп!. И ребята будте по проще почти ничего не понял из вашего разговора!

[s-andriano]

Сообщение от FoggySpurs

Так Можно увидеть окончательно работающий код? не один из здесь приведенныйх не работает( Желательно использовать TFilestream и задать палитру.Код должен работать с ЛЮБЫМ бмп!. И ребята будте по проще почти ничего не понял из вашего разговора!

Гм...
Условие необходимости работы с ЛЮБЫМ bmp достаточно сильное. И в исходной постановке никак не фигурирующее.
Более того, в теме рассматривалась возможность работы ТОЛЬКО с 24-битным bmp, и спор был лишь о том, что должна делать программа при попытке открыть что-то другое - писать сообщение, что она с таким не работает или вылетать по ошибке.

В общем, думаю, если Вам нужен готовый код - прямая дорога в фриланс. Никто не будет за просто так делать код, который может работать:
1. С bmp любого размера, в т.ч. превышающие 2 Гб.
2. С bmp любого формата.

Более того, если по п.2 можно найти как готовые примеры, так и библиотечные процедуры, то по п.1 неизбежно должен встать вопрос о критериях оптимизации, т.к. обработка больших массивов данных требует и большого времени.

В целом тема содержит лишь советы, что и как лучше делать.
Хотите делать, но не понимаете, как - задавайте конкретные вопросы.
Хотите получить готовый код - заказывайте работу за деньги (ко мне обращаться не надо - я софт за деньги не пишу).

[FoggySpurs]

Имеем изображение 4 бита на пиксель.размер 12859/8201 пикс. использует 15 цветовых индексов в политре. смещение в байтах от начала 114.
заганяю файл в поток:
sL := TFileStream.Create(OpenDialog1.File name,fmOpenRead);
как написать функц seek и цикл ,что бы отрисовать только каждую 14 строку и каждый 20 пиксель в ней???

[FoggySpurs]

Если бы были готовые примеры то я бы здесь не писал! и что такое фриланс?

[s-andriano]

Т.е. Вы хотите по сути сжать изображение в 14 раз по одной оси и в 20 - по другой?
Я бы советовал читать строки целиком и затем выбирать из них нужные полубайты.
Ну а 13 строк можно пропускать и посредством seek.
Надеюсь, длину строки и требуемые смещения Вы сможете подсчитать самостоятельно.

Кстати, не понимаю, зачем Вам TFileStream. На мой взгляд, проще и быстрее пользоваться обычным file. В конце концов, TFileStream - лишь обертка для обычных файловых операций.

[s-andriano]

Сообщение от FoggySpurs

и что такое фриланс?

Раздел этого форума: http://programmersforum.ru/forumdisplay.php?f=29

[FoggySpurs]

Сообщение от s-andriano

Т.е. Вы хотите по сути сжать изображение в 14 раз по одной оси и в 20 - по другой?
Я бы советовал читать строки целиком и затем выбирать из них нужные полубайты.
Ну а 13 строк можно пропускать и посредством seek.
Надеюсь, длину строки и требуемые смещения Вы сможете подсчитать самостоятельно.

Кстати, не понимаю, зачем Вам TFileStream. На мой взгляд, проще и быстрее пользоваться обычным file. В конце концов, TFileStream - лишь обертка для обычных файловых операций.

Когда изображение большое а аперативная память компа маленькая скажем 512 мб...мы не можем сканировать все изо!( Как это сделать посредством seek? я не могу перевести задачу с русского языка на язык делфи!