Получение изображения

Здесь обсуждаются технические аспекты создания дополнений.
Daren
Сообщения: 12
Зарегистрирован: 15:42, 05.03.2012

Получение изображения

Сообщение Daren »

Пожалуйста дайте пример получения картинки на delphi 7.
Maxim Mirgorodsky
Администратор
Сообщения: 6867
Зарегистрирован: 09:56, 27.06.2005

Re: Получение изображения

Сообщение Maxim Mirgorodsky »

Просьба пояснить что именно непонятно.
Daren
Сообщения: 12
Зарегистрирован: 15:42, 05.03.2012

Re: Получение изображения

Сообщение Daren »

Немогу составить функция для удобной работы с данными! И так же непонятна инструкция по получению изображения!
Maxim Mirgorodsky
Администратор
Сообщения: 6867
Зарегистрирован: 09:56, 27.06.2005

Re: Получение изображения

Сообщение Maxim Mirgorodsky »

Функции по работе с данными есть в примерах для Delphi: http://www.commfort.com/ru/forum/viewto ... 179#p54179
Изображения представляют собой обычные данные jpg-файлов. Примеры функций конвертации: http://www.commfort.com/ru/forum/viewto ... =35&t=7609
Daren
Сообщения: 12
Зарегистрирован: 15:42, 05.03.2012

Re: Получение изображения

Сообщение Daren »

Вопрос изображение для отправки нужно с конвертировать в текст?? И для получения обратно???
Maxim Mirgorodsky
Администратор
Сообщения: 6867
Зарегистрирован: 09:56, 27.06.2005

Re: Получение изображения

Сообщение Maxim Mirgorodsky »

Не в текст, а в "данные". Текст измеряется в символах - на каждый символ 2 байта (потому что юникод). Данные измеряются в байтах.
Daren
Сообщения: 12
Зарегистрирован: 15:42, 05.03.2012

Re: Получение изображения

Сообщение Daren »

Точно. Благодаря тем ссылкам я научился публиковать изображение но получить так и не получилось! Может кто нибудь сможет это код перевести на Delphi!?


void __fastcall fAnsiToJPEG(AnsiString *aSource,TJPEGImage * jpg)
{
TMemoryStream * ms1 = new TMemoryStream;
ms1->Write((*aSource).c_str(),(*aSource).Length());
ms1->Position = 0;

jpg->LoadFromStream(ms1);

delete ms1;
}
Daren
Сообщения: 12
Зарегистрирован: 15:42, 05.03.2012

Re: Получение изображения

Сообщение Daren »

С функцией разобрал. Вроде правильно.

function fAnsiToJPEG(var aSource:AnsiString):TJPEGImage;
var ms1: TMemoryStream;
begin
ms1:= TMemoryStream.Create;
ms1.Write(aSource, Length(aSource));
ms1.Position:= 0;
Result.LoadFromStream(ms1);
ms1.Destroy;
end;

Но теперь не могу получить данные картинки от CommFort ! Может кто нибудь знает как её получать???
Maxim Mirgorodsky
Администратор
Сообщения: 6867
Зарегистрирован: 09:56, 27.06.2005

Re: Получение изображения

Сообщение Maxim Mirgorodsky »

Версия сервера (или клиента) последняя?
Daren
Сообщения: 12
Зарегистрирован: 15:42, 05.03.2012

Re: Получение изображения

Сообщение Daren »

Клиент 5.40
Maxim Mirgorodsky
Администратор
Сообщения: 6867
Зарегистрирован: 09:56, 27.06.2005

Re: Получение изображения

Сообщение Maxim Mirgorodsky »

Тогда необходимо более подробное описание проблемы (можно с кодом).
Daren
Сообщения: 12
Зарегистрирован: 15:42, 05.03.2012

Re: Получение изображения

Сообщение Daren »

Да дело не в проблеме! А в незнание. По инструкции после получения сообщения в общий канал: если сообщение равно [image] нужно там что заделать что бы получить данные! Я инструкцию где то потерял поэтому и спрашиваю!
Аватара пользователя
SV
Сообщения: 797
Зарегистрирован: 00:11, 06.09.2010
Откуда: Киров

Re: Получение изображения

Сообщение SV »

Вот тебе инструция
Вложения
Инструкция.zip
(19.03 КБ) 455 скачиваний
Maxim Mirgorodsky
Администратор
Сообщения: 6867
Зарегистрирован: 09:56, 27.06.2005

Re: Получение изображения

Сообщение Maxim Mirgorodsky »

Это устаревшая. Актуальная в соседней теме: http://www.commfort.com/ru/forum/viewto ... =35&t=7061
Daren
Сообщения: 12
Зарегистрирован: 15:42, 05.03.2012

Re: Получение изображения

Сообщение Daren »

А то есть после считывания [image] сразу получать данные!?? И данные будут равны AnsiString ?
Ответить