怎么获取图片里面的文字信息

如何获取图片里面的文字信息
我用文本的方式打开个jpg文件会出现大家所看到的乱码

我想得到的也是这些乱码如何把这些乱码内容保存在个文本里起来？

我用MEMO loadfromfile只会得到个 ? 而已

------解决方案--------------------
文本文件只能显示可见字符（ASCII码32以上的字符），要把二进制图像作为文本保存，可以转换为16进制字符保存，Delphi就是这样保存的。具体代码可参见以下：

Delphi(Pascal) code

procedure TForm1.Button1Click(Sender: TObject);
var
  si, so: TStream;
  Buf: array[1..32] of Byte;
  s: string;
  Count, I, J: Integer;
begin
  si := TFileStream.Create('D:\VclLib\GdiplusDemo\Media\20041001.jpg', fmOpenRead);
  so := TFileStream.Create('D:\VclLib\GdiplusDemo\Media\20041001.txt', fmCreate);
  try
    Count := 32;
    while Count = 32 do
    begin
      Count := si.Read(Buf, 32);
      s := '';
      for I := 0 to Count - 1 do
        s := s + IntToHex(Buf[I], 2);
      s := s + #13 + #10;
      so.Write(s[1], Count * 2 + 2);
    end;
  finally
    si.Free;
    so.Free;
  end;
end;

------解决方案--------------------
将文件读到 TMemoryStream中，然后搜索 Date

怎么获取图片里面的文字信息

相关推荐