Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перевод картинки в стринг и обратно [D7, XP]


Gaara_of_the_Desert ©   (2007-05-15 23:40:00) 

Сталкнулся с потребностью перевести картинку в стринг. Если не трудно, покажите пример перевода.


Amoeba   (2007-05-17 15:32:00) [1]


> Это не изврат, а, IMHO, особый вид прикладного творчества
> ASCI-art, кажись, его зовут.
>
> Да, кстати, когда-то давно были весьма популярны изображения
> классических произведений искусства, распечатанные АЦПУ
> :)
>

Не так давно видел в сети программку, выполняющую такое преобразование картинок.


Германн   (2007-05-17 02:21:00) [2]


> Германн ©   (17.05.07 00:42) [17]

Пытался полтора часа вспомнить, где я видел некую картину. (С целью определить степень "моего склероза" ака "моих провалов в памяти". :) В одной из родственных моей, научных групп МИФИ, в лаборатории был шкафчик. На внешней поверхности дверцы сего шкафчика была "Мона Лиза" в буковках, а на внутренней, тоже в буковках - девица, чья одежда была ограничена бантиком в причёске :)
Так и не вспомнил :(


Германн   (2007-05-17 00:42:00) [3]


> Да, кстати, когда-то давно были весьма популярны изображения
> классических произведений искусства, распечатанные АЦПУ
> :)
>

Помню. Но были и не только классические :)


Leonid Troyanovsky   (2007-05-16 18:27:00) [4]


> Германн ©   (16.05.07 01:22) [9]

> > Я хочу преобразовать картинку в строку, для передачи по
> > сети.

> А зачем такой изврат? Кто или что мешает "передать по сети"
> массив байт?

Это не изврат, а, IMHO, особый вид прикладного творчества
ASCI-art, кажись, его зовут.

Да, кстати, когда-то давно были весьма популярны изображения
классических произведений искусства, распечатанные АЦПУ :)

--
Regards, LVT.


DVM   (2007-05-16 17:57:00) [5]


> Indy!

Кроме инди есть еще EncdDecd.pas


iXT   (2007-05-16 17:42:00) [6]

> [13] DVM ©   (16.05.07 17:37)
> Не помню название модуля.


Indy!


DVM   (2007-05-16 17:37:00) [7]


> Сталкнулся с потребностью перевести картинку в стринг. Если
> не трудно, покажите пример перевода.

Я думаю тебе Base 64 кодировка подойдет. Как раз в текст кодирует любые данный.

И кодер и декодер есть в стандартной поставке D7.

Не помню название модуля.


homm   (2007-05-16 12:06:00) [8]

> Перевод картинки в стринг и обратно

OCR что-ли?


Asail   (2007-05-16 12:05:00) [9]


> перевести картинку в стринг


Ага, а потом в текстовый файл и открывать его в Notepad'е...
Где-то я уже такое видел :-)

http://www.delphimaster.ru/cgi-bin/nuts.pl?showpage=4


Правильный Вася   (2007-05-16 11:57:00) [10]

распознавание образов?


Германн   (2007-05-16 01:22:00) [11]


> Gaara_of_the_Desert ©   (16.05.07 00:10) [4]
>
> Я хочу преобразовать картинку в строку, для передачи по
> сети.
>

А зачем такой изврат? Кто или что мешает "передать по сети" массив байт?

> Ст олкнулся с потребностью перевести картинку в стринг.

Это не потребность, а скорее всего просто лень изучать хелп.


Efir   (2007-05-16 00:41:00) [12]

Ну можно примерно так:

pix:PByteArray;
s:string;

s:='';
Bitmap.Pixeformat:=pf24bit;
for y:=0 to Bitmap.Height-1 do begin
 pix:=Bitmap.ScanLine[y];
 for x:=0 to Bitmap.Width*3-1 do s:=s+chr(pix[x]);
end;


McSimm   (2007-05-16 00:36:00) [13]

Например
TBitmap.SaveToStream записать в TStringStream и запросить TStringStream.DataString


Gaara_of_the_Desert   (2007-05-16 00:20:00) [14]

нет, не в масив.
В строку(string). Набор симовол скажем так.


Efir   (2007-05-16 00:19:00) [15]

Тогда объясни в какую строку. В массив чисел?


Gaara_of_the_Desert   (2007-05-16 00:10:00) [16]

Я хочу преобразовать картинку в строку, для передачи по сети.


McSimm   (2007-05-16 00:06:00) [17]

Вопрос совершенно непонятен, лучше напишите что вы хотите сделать.
А так можно только гадать, что имеется в виду.


antonn   (2007-05-16 00:04:00) [18]

в строку)))))))
капец, наивная душа


Efir   (2007-05-15 23:57:00) [19]

В каком смысле в стринг?


Наверх

Титульная страница Поиск, карта сайта Написать письмо