Forum

OCR:bad language
 
Bildirimler
Hepsini Temizle

OCR:bad language

7 Yazılar
2 Üyeler
0 Reactions
752 Görüntüleme
(@cagatayaksoy)
Gönderiler: 95
Estimable Member
Konu başlatıcı
 

Hata Budur ; ? 

[url= http://i.hizliresim.com/7k4APv.jp g" target="_blank">http://i.hizliresim.com/7k4APv.jp g"/> [/img][/url]

 

Office  2007 yüklü ...

 
Gönderildi : 29/06/2015 01:43

(@BurakSenturk)
Gönderiler: 70
Trusted Member
 

Selam,

Öncelikle hiç bir bilgi yazmamışsınız. Ne kullandığınız component var, ne detaylı exception mesajı var. Buradaki hata mesajına ait ekran görüntüsünü yorumlamamızı bekliyorsunuz.

OCR lamaya çalıştığın bitmaplerin formatında sorun olabilir.

Dil set etmiyor olabilirsin ya da set ettiğin dil ile ilgili bir problem olabilir.

Kullandığın component de bir hata olabilir.

Olabilirde olabilir, biraz daha detay verir isen daha spesifik cevaplar bulabilirsin.

 

İyi Günler Dilerim, 

 
Gönderildi : 29/06/2015 18:38

(@cagatayaksoy)
Gönderiler: 95
Estimable Member
Konu başlatıcı
 
    Dim Dir As String = ""
 
 
    Private Sub Seç()
        OpenFileDialog1.FileName = ""
        OpenFileDialog1.Filter = "Resim Dosyalar1|*.jpg; *.png; *.bmp; *.jpeg; *.PNG;"
        If (OpenFileDialog1.ShowDialog = DialogResult.OK) Then
            Dir = OpenFileDialog1.FileName.ToString
            PictureBox1.Image = Image.FromFile(Dir)
        End If
    End Sub
 
 
 
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Seç()
    End Sub
 
 
 
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Try
            Dim belge As MODI.Document = New MODI.Document
            belge.Create(Dir)
            belge.OCR(MODI.MiLANGUAGES.miLANG_TURKISH, True, True)
            For Each resim As MODI.Image In belge.Images
                Dim plan As MODI.Layout = resim.Layout
                RichTextBox1.Text = plan.Text
            Next
            belge.Close()
        Catch hata As Exception
        End Try
    End Sub
 
Gönderildi : 30/06/2015 01:24

(@BurakSenturk)
Gönderiler: 70
Trusted Member
 

Selam,

Kullandığın office Türkçe mi ?

İyi Günler Dilerim, 

 
Gönderildi : 30/06/2015 02:30

(@cagatayaksoy)
Gönderiler: 95
Estimable Member
Konu başlatıcı
 

Evet , Microsoft Office 2007 ( Türkçe ) 

 
Gönderildi : 30/06/2015 12:43

(@BurakSenturk)
Gönderiler: 70
Trusted Member
 

Selam,

belge.OCR(MODI.MiLANGUAGES.miLANG_TURKISH, True, True) bu satırı şu satırla değiştirince çıkan sonucu gönderebilir misin

 belge.OCR(MODI.MiLANGUAGES.miLANG_ENGLISH, True, True)

 

İyi Günler Dilerim, 

 
Gönderildi : 30/06/2015 13:51

(@cagatayaksoy)
Gönderiler: 95
Estimable Member
Konu başlatıcı
 

Teşekkürler!  Sorun  Çözüldü .

 
Gönderildi : 30/06/2015 14:10

Paylaş: