Grafikformat TIF

Nutzung, Komponenten, .NET

Moderator: Moderatoren

Antworten
Benutzeravatar
Wolfgang Ciriack
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 2932
Registriert: Sa, 24. Sep 2005 9:37
Wohnort: Berlin
Hat sich bedankt: 13 Mal
Danksagung erhalten: 34 Mal
Kontaktdaten:

Grafikformat TIF

Beitrag von Wolfgang Ciriack »

Kann mir jemand sagen, wie ich tif-Dateien anzeigen kann ?
Viele Grüße
Wolfgang
Benutzeravatar
Tom
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 9345
Registriert: Do, 22. Sep 2005 23:11
Wohnort: Berlin
Hat sich bedankt: 100 Mal
Danksagung erhalten: 359 Mal
Kontaktdaten:

Beitrag von Tom »

Hallo, Wolfgang.

Im Moment am einfachsten mit irgendeinem ActiveX-Control (suchen!), aber es ist bei der DevCon auf der Prioritätenliste stark nach oben geschoben worden.
Herzlich,
Tom
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15688
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Beitrag von brandelh »

Hallo,

der Internet Explorer soll jede Menge Dateien anzeigen können und leicht als ActiveX einbindbar sein. Da gibt es doch ein HTTP Beispiel - meine ich mich erinnern zu können. Statt einer HTML Seite einfach die TIF Datei mit Pfad angeben ...
Gruß
Hubert
Benutzeravatar
Wolfgang Ciriack
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 2932
Registriert: Sa, 24. Sep 2005 9:37
Wohnort: Berlin
Hat sich bedankt: 13 Mal
Danksagung erhalten: 34 Mal
Kontaktdaten:

Beitrag von Wolfgang Ciriack »

ok, dann werde ich mich mal auf die Suche begeben und meine ersten Versuche mit ActiveX machen...
Viele Grüße
Wolfgang
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15688
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Beitrag von brandelh »

Hallo,

übrigens, wenn du die Bilder nur überhaupt anzeigen willst, könntest du natürlich auch einen RunShell Befehl nutzen ...
Gruß
Hubert
Benutzeravatar
Wolfgang Ciriack
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 2932
Registriert: Sa, 24. Sep 2005 9:37
Wohnort: Berlin
Hat sich bedankt: 13 Mal
Danksagung erhalten: 34 Mal
Kontaktdaten:

Beitrag von Wolfgang Ciriack »

Hallo Hubert,
nein, ich habe ein Browse, in dem die gesannten tif-Dateien mit Dateinamen angezeigt werden, nach der OCR-Erkennung existiert zu jeder Grafikdatei auch eine gleichnamige Textdatei. Ich extrahiere aus der Textdatei eine bestimmte (Lieferschein-) Nummer. Nun kann es aber vorkommen, das diese Nummer durch das OCR-Programm nicht richtig (oder gar nicht) erkannt wurde. Somit möchte ich den entsprehenden Bereich der Grafikdatei neben dem Browse anzeigen, damit man diese Nummer per Hand dem Dokument zuweisen kann, d.h. ich muss bei Click auf die Browse-Zeile die entsprechende Grafik anzeigen.
Viele Grüße
Wolfgang
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15688
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Beitrag von brandelh »

Hi,

beim XbpBitmap kamen bei 1.9 neue Parameter, die könnten nützlich sein:
:getIPicture() --> oPicture
Gibt die Grafik als Automation-Objekt der Klasse IPicture zurück.
:setIPicture( <oPicture> ) --> lSuccess
Initialisiert ein Bitmap-Objekt mit den Grafikdaten eines IPicture Automation-Objekts.
mit dem COM Browser habe ich jetzt auf den ersten Blick nichts gefunden. Dennoch denke ich, dass es besser wäre das TIF über RUNSHELL an ein beliebiges Grafikprogramm zu übergeben und anzeigen zu lassen.
So hätte der Anwender mehr Übersicht und du nicht das Problem herauszufinden wo genau jetzt diese Nummer liegt und wie du den Bildschirmausschnitt definieren kannst, der angezeigt werden soll.
Gruß
Hubert
Benutzeravatar
Wolfgang Ciriack
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 2932
Registriert: Sa, 24. Sep 2005 9:37
Wohnort: Berlin
Hat sich bedankt: 13 Mal
Danksagung erhalten: 34 Mal
Kontaktdaten:

Beitrag von Wolfgang Ciriack »

Hallo Hubert,
ich habe das Problem gelöst. Habe mir einfach ein Shareware Viewer OCX heruntergeladen, das war mittels eXPress und Xbase 1.9 innerhalb von einer Stunde eingebunden. Funktioniert jetzt so wie ich es brauche.
Wenn jemand interessiert ist, kann ich ihm den Code gerne mailen.

Hätte nicht gedacht, dass das mit ActiveX so einfach zu integrieren ist.
Viele Grüße
Wolfgang
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15688
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Beitrag von brandelh »

Hallo,

wie heißt denn der Viewer ?
Bzw. von wo hast du ihn her ?
Gruß
Hubert
Benutzeravatar
Wolfgang Ciriack
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 2932
Registriert: Sa, 24. Sep 2005 9:37
Wohnort: Berlin
Hat sich bedankt: 13 Mal
Danksagung erhalten: 34 Mal
Kontaktdaten:

Beitrag von Wolfgang Ciriack »

Er heißt X360 Tiff & Fax Viewer und ich habe ihn unter

http://www.freedownloadscenter.com/Prog ... X_OCX.html

heruntergeladen. Er kostet ca. 60 $.

Folgende Methoden habe ich benutzt:

Code: Alles auswählen


@ 3,1 DCBROWSE oBrowseBilder ;
      DATA aFiles ;
      SIZE 20,23 ;
      POINTER nPointer ;
      CURSORMODE XBPBRW_CURSOR_ROW ;
      ITEMMARKED {|| iif(nPointer<>nView, (oTifView:LoadImage(scanfolder+"\"+aFiles[nPointer][2]), nView:=nPointer, oTifView:ZoomToFitByWidth()),NIL) } ;
      ITEMSELECTED {|| EditLfsNr(@aFiles[nPointer][3],@aFiles[nPointer][5]), oBrowseBilder:RefreshCurrent() } ;
      PRESENTATION aPresPar1 ;
      FIT ;
      EVAL {|o| o:ItemRbDown:={|aMPos,aLC,oBr| ActRbMenu(aMPos,aLC,oBr,oPopupMenu)} } ;
      NOHSCROLL 

@ 3,64 DCSTATIC TYPE XBPSTATIC_TYPE_RECESSEDBOX ;
     OBJECT oBild ;
     SIZE 50,23

DCACTIVEXCONTROL oTifview ;
      CLSID "TIFFVIEWER.TiffViewerCtrl.1" ;
      PARENT oBild 

@27,67.00 DCPUSHBUTTON CAPTION "Zoom -" ;
      SIZE 8,1 ;
      ACTION {|| oTifview:XZoomValue:=max(nZoom-0.2,0.2), oTifview:Zoom() } ;
      TABGROUP XBP_WITHIN_GROUP ;
      TABSTOP 

@27,76.00 DCPUSHBUTTON CAPTION "Passend" ;
      SIZE 8,1 ;
      ACTION {|| oTifView:ZoomToFitByWidth() } ;
      TABGROUP XBP_WITHIN_GROUP ;
      TABSTOP 

@27,85.00 DCPUSHBUTTON CAPTION "Zoom +" ;
      SIZE 8,1 ;
      ACTION {|| oTifview:XZoomValue:=nZoom+0.2, oTifview:Zoom() } ;
      TABGROUP XBP_WITHIN_GROUP ;
      TABSTOP 

......

Viele Grüße
Wolfgang
Antworten