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

Вниз

Загрузка изображений из паралельного потока.   Найти похожие ветки 

 
Mirror ©   (2004-12-07 20:28) [0]

Доброго времени суток!
Люди, кто работал с компонентом ImageEn, подскажите, пожалуйсто, несколько вещей. Как загружать в него картинки с помощью не основного потока не вызывая Synchronize? Смысл в том, что файлы, которые нужно грузить, давольно большие и я хочу сгрузить эту операцию на другой поток (Thread), чтобы приложение не "висло" в момент загрузки файла.(Если кто знает другой метод решения этой проблемы - пишите). И второй вопрос: как с помощью ImageEn читать EXIF информацию?

З.Ы. Модераторы! Если я опять написал не в ту конференцию (по вашему мнению) можно не удалять ветку, а переместить её туда, где, по вашему мнению, она должна быть, а?


 
Digitman ©   (2004-12-08 18:26) [1]


> Mirror


не знаю, что такое ImageEn, но, скорей всего, ты промахнулся темой конференции. В "Основная" место вопросу.


 
programania ©   (2004-12-08 20:16) [2]

>чтобы приложение не "висло" в момент загрузки файла
Возможно не "висло" это чтоб оно действовало
от клавишей и мыши?
Возможно действия это скорее всего загрузка другого файла?
Тогда текущую загрузку нужно прервать
и значит поток не имеет смысла, потому что не нужна
одновременная работа.
Загрузку можно прервать при чтении файла, если
читать по кусочкам в memoryStream:

stoi:=false;
assignFile(f,imk);
reset(f,1);
r:=fileSize(f);
ms.size:=r;
n:=0;
repeat
 if r>500000 then q:=500000 else q:=r;
 blockRead(f,ptr(integer(ms.Memory)+n)^,q);
 inc(n,q);
 dec(r,500000);
 application.processMessages;
until (r<=0)or stoi;
ms.Seek(0,soFromBeginning);
closeFile(f);

if not stoi then form1.ImageEnIO1.LoadFromStream(ms);


в FormKeyDown FormMouseDown добавить stoi:=true;

Загрузку можно прервать при декодировании jpeg
для этого в JpegFilt.pas  версии 1.9.7b добавить
в uses ...,forms;
в procedure ReadJPegStream
в    while (cinfo.output_scanline<cinfo.output_height)
and not stoi do begin
application.processMessages;

об Exif
в версии imageEn 2.0.3
ImageEnIO1:=TImageEnIO.create(form1);
ImageEnIO1.ParamsFromFile("I0001.jpg");
label1.caption:=ImageEnIO1.Params.EXIF_Model+"  "+
               ImageEnIO1.Params.EXIF_DateTime;
и т.п. еше около 50 параметров
к сожалению у меня нет исходников этой версии
если что об них известно сообщите пожалуста.


 
murtix   (2004-12-14 07:05) [3]

А где можно его вхять этот ImageEn


 
programania ©   (2004-12-14 20:45) [4]

>А где можно его вхять этот ImageEn

http://www.hyrix.com
или на CD-сборнике компонент бывает
старая версия 1.9, но с исходниками.



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

Форум: "Media";
Текущий архив: 2005.03.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.052 c
3-1109412494
Walker
2005-02-26 13:08
2005.03.27
Нужен компонент а-ля Access "поле со списком"


1-1110538747
marcel
2005-03-11 13:59
2005.03.27
Не прорисовываются поля Object Inspector


1-1111010081
GanibalLector
2005-03-17 00:54
2005.03.27
TStringList


6-1106741376
Vadim X
2005-01-26 15:09
2005.03.27
THTTP SendForm


6-1106572893
PURGEN
2005-01-24 16:21
2005.03.27
SMS





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