Модераторы: Daevaorn
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> GMIMG -> MIME и изображение, Преобразование изображения в текст 
:(
    Опции темы
fearuth
Дата 12.8.2009, 11:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 54
Регистрация: 9.9.2008

Репутация: нет
Всего: 1



Привет Всем, не подскажите, как преобразовать Рисунок в текст, а потом обратно.

Почитал, можно делать это с помощью mime, установил gmime. Литературы нет по этому поводу...
PM MAIL   Вверх
GoldFinch
Дата 12.8.2009, 12:02 (ссылка)    | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата



****


Профиль
Группа: Завсегдатай
Сообщений: 2141
Регистрация: 30.11.2008

Репутация: 15
Всего: 26



что значит в текст?
PM MAIL ICQ   Вверх
fearuth
Дата 13.8.2009, 12:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 54
Регистрация: 9.9.2008

Репутация: нет
Всего: 1



PM MAIL   Вверх
azesmcar
Дата 13.8.2009, 12:40 (ссылка) |  (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


uploading...
****


Профиль
Группа: Участник Клуба
Сообщений: 6291
Регистрация: 12.11.2004
Где: Армения

Репутация: 81
Всего: 211



Цитата(fearuth @  12.8.2009,  11:21 Найти цитируемый пост)
Привет Всем, не подскажите, как преобразовать Рисунок в текст, а потом обратно.

http://ru.wikipedia.org/wiki/Base64


Это сообщение отредактировал(а) azesmcar - 13.8.2009, 12:44
PM   Вверх
A5uKa
Дата 13.8.2009, 13:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


TЋ♥s F1rȜ iƧ BurȠiƞg
***


Профиль
Группа: Awaiting Authorisation
Сообщений: 1928
Регистрация: 30.8.2008

Репутация: нет
Всего: 16



Delphi

Код

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, NMUUE, ExtCtrls;

type
  TForm1 = class(TForm)
    NMUUProcessor1: TNMUUProcessor;
    BOpen: TButton;
    EIn: TEdit;
    EOut: TEdit;
    BCode: TButton;
    BDecode: TButton;
    OpenDialog1: TOpenDialog;
    RBMime: TRadioButton;
    RBCode: TRadioButton;
    procedure BOpenClick(Sender: TObject);
    procedure BCodeClick(Sender: TObject);
    procedure BDecodeClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.BOpenClick(Sender: TObject);
begin
  if OpenDialog1.Execute then
    EIn.Text := OpenDialog1.FileName;
end;

procedure TForm1.BCodeClick(Sender: TObject);
var
  FS1,
  FS2: TFileStream;
begin
  // Encode
  FS1 := TFileStream.Create(EIn.Text, fmOpenRead);
  FS2 := TFileStream.Create(EOut.Text, fmCreate);
  try
    if RBCode.Checked then
      NMUUProcessor1.Method := uuCode
    else
      NMUUProcessor1.Method := uuMime;
    NMUUProcessor1.InputStream := FS1;
    NMUUProcessor1.OutputStream := FS2;
    NMUUProcessor1.Encode;
  finally
    FS1.Free;
    FS2.Free;
  end;
end;

procedure TForm1.BDecodeClick(Sender: TObject);
var
  FS1,
  FS2: TFileStream;
begin
  // Decode
  FS1 := TFileStream.Create(EOut.Text, fmOpenRead);
  FS2 := TFileStream.Create(EIn.Text, fmCreate);
  try
    if RBMime.Checked then
      NMUUProcessor1.Method := uuMime
    else
      NMUUProcessor1.Method := uuCode;
    NMUUProcessor1.InputStream := FS1;
    NMUUProcessor1.OutputStream := FS2;
    NMUUProcessor1.Decode;
  finally
    FS1.Free;
    FS2.Free;
  end;

end;

end.

PM   Вверх
fearuth
Дата 17.8.2009, 14:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 54
Регистрация: 9.9.2008

Репутация: нет
Всего: 1



A5uKa, спасибо, но... Я просил С++, Delphi я не очень знаю.
PM MAIL   Вверх
azesmcar
Дата 17.8.2009, 14:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


uploading...
****


Профиль
Группа: Участник Клуба
Сообщений: 6291
Регистрация: 12.11.2004
Где: Армения

Репутация: 81
Всего: 211



fearuth

Я ссылку прислал, ты бы зашел, посмотрел..
http://base64.sourceforge.net/b64.c
PM   Вверх
fearuth
Дата 17.8.2009, 14:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 54
Регистрация: 9.9.2008

Репутация: нет
Всего: 1



Спасибо!!! =)
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++:Общие вопросы"
Earnest Daevaorn

Добро пожаловать!

  • Черновик стандарта C++ (за октябрь 2005) можно скачать с этого сайта. Прямая ссылка на файл черновика(4.4мб).
  • Черновик стандарта C (за сентябрь 2005) можно скачать с этого сайта. Прямая ссылка на файл черновика (3.4мб).
  • Прежде чем задать вопрос, прочтите это и/или это!
  • Здесь хранится весь мировой запас ссылок на документы, связанные с C++ :)
  • Не брезгуйте пользоваться тегами [code=cpp][/code].
  • Пожалуйста, не просите написать за вас программы в этом разделе - для этого существует "Центр Помощи".
  • C++ FAQ

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Earnest Daevaorn

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C/C++: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0496 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.