Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.21;
Скачать: [xml.tar.bz2];

Вниз

Запись графики в поток   Найти похожие ветки 

 
Snake   (2002-01-02 17:21) [0]

Пытаюсь записать несколько картинок в файловый поток. Все хорошо, но если поток открыть а потом записать, даже ничего не меняя, размер файла увеличивается, причем пропорционально числу картинок. Что делать?


 
Anatoly Podgoretsky   (2002-01-02 19:11) [1]

Чтобц размер не менялся, надо не записывать.


 
skaminski~~~~   (2002-01-02 23:37) [2]

А лучше поток не открывать, а стирать файлы - тогда размер даже уменьшаться станет 8)


 
MrBeer   (2002-01-03 09:11) [3]

Mozhesh sdelatj nemnogo po drugomu:

1) Pisatj kartinku v pustoi TMemoryStream (pravda on gad medlenii ochen esli ne znaet razmer).
2) Perepisivatj ee potom v TFileStream takim obrazom:
snachala integer kotorii = MemStream.Size (chtobi schitatj potom mozhno bilo), a za nim uzhe kartinku.
3) Goto 1

Best reagards, MrBeer.


 
Snake   (2002-01-03 16:51) [4]

Спасибо ребята, я разобрался сам. Дело в том, что размер картинки увеличивается при считывании из потока, картинка читает себя до конца потока (т.е. вместе с другой инфой) и потом ее хоть куда запихай, даже в jpg, ее размер будет огромный. Так что теперь все ОК.



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

Форум: "Основная";
Текущий архив: 2002.01.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.75 MB
Время: 3.024 c
1-66259
Quest
2001-12-29 09:44
2002.01.21
Пропадает каретка в режиме редактирования ячейки TStringGrid


4-66401
qwertysdffsfsdfa
2001-11-22 01:19
2002.01.21
Как читать буфер клавиатуры?


4-66408
YUS
2001-11-21 20:52
2002.01.21
CreateDialog -????


1-66280
Lazyk
2002-01-04 14:57
2002.01.21
Printer accounting


6-66330
DARS73
2001-10-25 17:51
2002.01.21
INTERBASE И ПОДКДЮЧИТЬ EXEL В DELPHI





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