XProfan

Julian
Schmidt

Ich habe gerade entdeckt das eine Drucken bereit in un HTMLWIn Box eingebaut ist. Sie è sich im Kontextmenu..
Allerdings hätte ich diese Funktion doch gerne in der Menuleiste meines selbstgeschriebenen Browsers.
Kann man diese Funktion auf meinen Druckenbutton übertragen oder die Funktion auf diesen verknüpfen?

LG

Julian

bild.png	141 kB

Hochgeladen:	09.03.2011

Downloadcounter:
		Download

˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

Schau mal ob es eine OCX-Methode gibt oder nimm z.B. WinCopy.

Julian
Schmidt

Bei WinCopy druckt er nur den sichtbaren Bereich und nicht die ganze Seite(siehe PDF oben)
Hier im Foro ist nichts zu OCX im Bezug auf ein Kontextmenu ansprechen!
Wo soll Io l' nach OSX.Methoden,Funktionen suchen?

˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

Julian57 (09.03.11)

Wo soll Io l' nach OSX.Methoden,Funktionen suchen?

Cerca mal nach OCX -

mindestens in 1 Paket ist imho auch ein "Methoden-Browser".

Kompilieren Markieren Separieren

Uwe
''Pascal''
Niemeier

Hi Leute!

Mein Lösungsvorschlag ab XProfan 11.2 / XP:

window %maxX,%maxY
appendmenubar 1,"Drucken mit Vorschau"
appendmenubar 2,"Drucken ohne Vorschau"
usermessages 16
 $H Windows.ph
 $H ocx3a.ph
 $I ocx3a.inc
ocxInit()
def %Exec 4
def &OLECMDID_PRINTPREVIEW 7
def $IID_OleCommandTarget "{b722bccb-4e68-101b-a2bc-00aa00404770}"
declare Document&,IOleCommandTarget&,Html$
declare WebBrowser&,WebControl&
Html$="C:\Test.html"
WebControl&=create("HTMLWin",%hwnd,Html$,1,0,0,width(%hwnd),height(%hwnd))
WebBrowser&=HTMLWin("QueryInterface",WebControl&)'--In Profan-Aiuto nicht dokumentiert!!
''--oder auch:
'Html$="C:\Test.html"
'WebBrowser&=ocxCreate(Html$,%hwnd,0,0,width(%hwnd),height(%hwnd),$50b00000,addr(WebControl&))

while 1

    waitinput
    case %umessage=16:break

    if %menuitem=1'-----------Drucken mit Vorschau circa IOleCommandTarget

        IOleCommandTarget&=QueryInterface(WebBrowser&,$IID_OleCommandTarget)
        CallMethod(IOleCommandTarget&,%Exec,0,&OLECMDID_PRINTPREVIEW,0,var#,0)
        ocxRelease(IOleCommandTarget&)

    elseif %menuitem=2'-------Drucken ohne Vorschau circa IHTMLDocument2

        Document&=ocxget(WebBrowser&,"Document")
        ocxMethod(Document&,"execCommand","print")
        ocxRelease(Document&)

    endif

endwhile

ocxRelease(WebBrowser&)
destroywindow(WebControl&)
ocxDeInit()

SeeYou
Pascal

10.03.2011 ▲

Julian
Schmidt

Super das funktioniert

Kann man darüber auch ander Kontexte ansprechen?
z. B. kopieren und einfügen oder auch soetwas wie Seitenquellcode Mostra oder sogar die Codierung?

LG

Julian

˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗
Webseite [...]

10.03.2011 ▲