Foxtable(狐表)用户栏目专家坐堂 → [求助]获取图片路径


  共有2602人关注过本帖树形打印复制链接

主题:[求助]获取图片路径

帅哥哟,离线,有人找我吗?
天一生水
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1137 积分:11224 威望:0 精华:0 注册:2017/9/26 16:30:00
[求助]获取图片路径  发帖心情 Post By:2018/4/16 14:05:00 [只看该作者]

将PDF文件分解成图片后,并显示在PictureBox控件中,然后对PictureBox控件中当前显示的图片进行识别。

但是如何获取图片的ImageFile,转入第二段代码中运行?

谢谢!

 

'1、将PDF文件分解成图片
Dim Pdfv As new PDFView.ConvertPDF.PDFConvert
Dim pcb As WinForm.PictureBox = e.form.Controls("照片")
Dim rz As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox3")
_pdfWrapper.CurrentPage = rz.text
pcb.Image = _pdfWrapper.Pages(_pdfWrapper.CurrentPage).GetBitmap(pcb.Width, pcb.Height,True)
msgbox(pcb.ImageFile)        ‘获取为空

 

'2、文字识别
If pbx.ImageFile <> "" Then
    Dim doc = CreateObject("MODI.Document")
    doc.Create(pcb.ImageFile)
    doc.OCR(2052, True, True)
    For i As Integer = 0 To doc.Images.count - 1
        Dim layout = doc.images(i).Layout       
    Next i
    doc.close
    doc = Nothing
Else
    msgbox("未添加图片!")
End If


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/4/16 14:10:00 [只看该作者]

1、pcb.Image.Save("d:\test.jpg")

 

2、doc.Create("d:\test.jpg")


 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:305 积分:2401 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2023/8/29 9:52:00 [只看该作者]

Dim pbx As WinForm.PictureBox
pbx = Forms("image").Controls("PictureBox1")
Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog 
dlg.Filter = "图片文件|*.jpg|图片文件|*.png"
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
pbx.ImageFile = "D:\dygl\管理项目1\Attachments\czr.jpg"
    MessageBox.Show("你选择的是:" & dlg.FileName, "提示") '提示用户选择的文件
    e.Form.Controls("label1").Text = dlg.FileName
    pbx.Image = GetImage("dlg.FileName")
  pbx.ImageFile = "dlg.FileName\*.jpg"
End If
如果把pbx.ImageFile = "D:\dygl\管理项目1\Attachments\czr.jpg"改成相对路径文件,在图片框中不显示,要如何修改


 回到顶部
帅哥哟,离线,有人找我吗?
riyuan
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:305 积分:2401 威望:0 精华:0 注册:2013/4/9 11:49:00
  发帖心情 Post By:2023/8/29 9:53:00 [只看该作者]

在对话框中选择文件,不在代码中指定文件,要如何才能在图片框中显示图片

 回到顶部