| |
| |
|
| - page 1 - |
|
Julian
Schmidt | j'ai mir deine OCX Aider einmal angeschaut.
et habe anhand deinen Quellcode es eh bien hinbekommen weitere Menupunkte im "HTMLWin Kontextmenu" anzusprechen.
LG
Julian |
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...]  | 13.03.2011 ▲ |
|
| |
|
 |
« cette Beitrag wurde comme Solution gekennzeichnet. » |
|
Uwe
''Pascal''
Niemeier | Hi Julian!
d'abord encore un Hinweis: avec cela du sur Teile einer HTML-Dossier ou bien Webseite zugreifen peux,
dois du sicherstellen, qui qui page vollständig geladen ist (cela J'ai eu bisher unterschlagen).
tout autor sommes dans den folgenen Beispielen entsprechende Warteschleifen incorporé.
comment peux on den Punkt "Eigenschaften" im Kontextmenu ansprechen
cela allez aussi wieder sur cela IOleCommandTarget -Interface; avec cela laisser sich alle Funktionen appel, qui sur diverse Menüs trop erreichen sommes:
KompilierenMarqueSéparationwindow 600,600
$H Windows.ph
$H ocx3a.ph
$I ocx3a.inc
def %Exec 4
def &OLECMDID_PROPERTIES 10
def $IID_OleCommandTarget "{b722bccb-4e68-101b-a2bc-00aa00404770}"
var Html$="C:\Test.html"
var WebControl&=create("HTMLWin",%hwnd,Html$,1,100,100,400,400)
while HTMLWin("GetBusy",WebControl&)
sleep 50
endwhile
ocxInit()
var WebBrowser&=HTMLWin("QueryInterface",WebControl&)
var IOleCommandTarget&=QueryInterface(WebBrowser&,$IID_OleCommandTarget)
CallMethod(IOleCommandTarget&,%Exec,0,&OLECMDID_PROPERTIES,0,var#,0)
ocxRelease(IOleCommandTarget&,Webbrowser&)
ocxDeInit()
waitkey
destroywindow(WebControl&class=s2>)
une liste weiterer Opportunités (&OLECMDID_Konstanten et en Werte) findest du ici:
[...] 
et comment peux on qui Seitenkodierung ansprechen?
qui Seitenkodierung ist une qualité des Dokumentes:
KompilierenMarqueSéparationwindow 600,600
usermessages 16
$H Windows.ph
$H ocx3a.ph
$I ocx3a.inc
popup "Charset"
appendmenu 1,"ISO-8859-1"
appendmenu 2,"ISO-8859-5"
appendmenu 3,"ISO-8859-7"
var Html$="C:\Test.html"
var WebControl&=create("HTMLWin",%hwnd,Html$,1,100,100,400,400)
tandis que HTMLWin("GetBusy",WebControl&)
sleep 50
endwhile
ocxInit()
var WebBrowser&=HTMLWin("QueryInterface",WebControl&)
var Document&=ocxget(WebBrowser&,"Document")
settimer 500'--Charset-sélection sur IE-Kontextmenü wird de WaitInput pas erkannt
tandis que 1
waitinput
cas %umessage=16:pause
cas %menuitem=1:ocxPut(Document&,"charset","ISO-8859-1")
cas %menuitem=2:ocxPut(Document&,"charset","ISO-8859-5")
cas %menuitem=3:ocxPut(Document&,"charset","ISO-8859-7")
cas %menuitem :HTMLWin("Refresh",WebControl&)'--Aktualisieren chez Changement
settext %hwnd,ocxget(Document&,"charset")
endwhile
killtimer
ocxRelease(Document&,WebBrowser&)
destroywindow(WebControl&)
ocxDeInit()
qui Zuordnung qui Länder usw. dois du mais selbst vornehmen. Dabei hilft peut-être ca:
[...]
PS: comment cet "Rechts-Links"-Geschichte funktioniert, habe je sur qui Schnelle aussi pas rausgekriegt 
SeeYou
Pascal |
|
| |
| |
| |
|
|
|
Julian
Schmidt | |
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 13.03.2011 ▲ |
|
| |
|
|
Thomas
Freier |
comment peux on den Seitenquellcode ansprechen?
je n'en sais rien quoi du avec cela meinst. Den Seitenquellcode peux du dir im MultiEdit ou bien Rtf-Éditer Montrer laisser et Travailler. Gewünschte Syntaxhervorhebung doit arrêt selbst incorporé volonté. |
|
| |
| |
| |
|
|
Julian
Schmidt | Thomas Freier (15.03.11)
comment peux on den Seitenquellcode ansprechen?
je n'en sais rien quoi du avec cela meinst. Den Seitenquellcode peux du dir im MultiEdit ou bien Rtf-Éditer Montrer laisser et Travailler. Gewünschte Syntaxhervorhebung doit arrêt selbst incorporé volonté.
cela bezieht sich sur dem Punkt "Quellcode anzeigen" dans dem Kontextmenu eines HTMLWin Dialogs.
comment peux on den Menupünkt sur OCX ansprechen? |
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 15.03.2011 ▲ |
|
| |
|
|
Uwe
''Pascal''
Niemeier | Hi Julian!
je denke, du meinst quelque chose comme:
KompilierenMarqueSéparationwindow %maxX,%maxY
$H Windows.ph
$H ocx3a.ph
$I ocx3a.inc
ocxInit()
var Html$="C:\Test.html"
var WebControl&=create("HTMLWin",%hwnd,Html$,1,0,0,width(%hwnd),height(%hwnd))
var WebBrowser&=HTMLWin("QueryInterface",WebControl&)
var Document&=ocxget(WebBrowser&,"Document")
var Body&=ocxget(Document&,"Body")
var innerHTML$=ocxget(Body&,"innerHTML")
var innerText$=ocxget(Body&,"innerText")
ocxRelease(Body&,Document&,WebBrowser&)
ocxDeInit()
waitinput
destroywindow(WebControl&)
cls
print innerText$
waitinput
cls
print innerHTML$
waitinput
Comme je le disais, mach toi am Besten un peu avec JavaScript vertraut.
là volonté qui verschiedenen Objekte et Eigenschaften, aus denen une HTML-Dossier besteht, beschrieben.
ou bien exposition la fois ici: [...]
SeeYou
Pascal |
|
| |
| |
| |
|
|
Julian
Schmidt | merci joli 
eh bien mon letzten Fragen,
comment peux on den Punkt "Eigenschaften" im Kontextmenu ansprechen
et comment peux on qui Seitenkodierung ansprechen? (ici trop muss encore dit volonté le moi den Punkt so comment il est comme SubPopup ins Programme einbauen veux, si cela une rôle spielen sollte.)
LG
Julian |
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 16.03.2011 ▲ |
|
| |
|
|
Uwe
''Pascal''
Niemeier | Hi Julian!
d'abord encore un Hinweis: avec cela du sur Teile einer HTML-Dossier ou bien Webseite zugreifen peux,
dois du sicherstellen, qui qui page vollständig geladen ist (cela J'ai eu bisher unterschlagen).
tout autor sommes dans den folgenen Beispielen entsprechende Warteschleifen incorporé.
comment peux on den Punkt "Eigenschaften" im Kontextmenu ansprechen
cela allez aussi wieder sur cela IOleCommandTarget -Interface; avec cela laisser sich alle Funktionen appel, qui sur diverse Menüs trop erreichen sommes:
KompilierenMarqueSéparationwindow 600,600
$H Windows.ph
$H ocx3a.ph
$I ocx3a.inc
def %Exec 4
def &OLECMDID_PROPERTIES 10
def $IID_OleCommandTarget "{b722bccb-4e68-101b-a2bc-00aa00404770}"
var Html$="C:\Test.html"
var WebControl&=create("HTMLWin",%hwnd,Html$,1,100,100,400,400)
while HTMLWin("GetBusy",WebControl&)
sleep 50
endwhile
ocxInit()
var WebBrowser&=HTMLWin("QueryInterface",WebControl&)
var IOleCommandTarget&=QueryInterface(WebBrowser&,$IID_OleCommandTarget)
CallMethod(IOleCommandTarget&,%Exec,0,&OLECMDID_PROPERTIES,0,var#,0)
ocxRelease(IOleCommandTarget&,Webbrowser&)
ocxDeInit()
waitkey
destroywindow(WebControl&class=s2>)
une liste weiterer Opportunités (&OLECMDID_Konstanten et en Werte) findest du ici:
[...]
et comment peux on qui Seitenkodierung ansprechen?
qui Seitenkodierung ist une qualité des Dokumentes:
KompilierenMarqueSéparationwindow 600,600
usermessages 16
$H Windows.ph
$H ocx3a.ph
$I ocx3a.inc
popup "Charset"
appendmenu 1,"ISO-8859-1"
appendmenu 2,"ISO-8859-5"
appendmenu 3,"ISO-8859-7"
var Html$="C:\Test.html"
var WebControl&=create("HTMLWin",%hwnd,Html$,1,100,100,400,400)
tandis que HTMLWin("GetBusy",WebControl&)
sleep 50
endwhile
ocxInit()
var WebBrowser&=HTMLWin("QueryInterface",WebControl&)
var Document&=ocxget(WebBrowser&,"Document")
settimer 500'--Charset-sélection sur IE-Kontextmenü wird de WaitInput pas erkannt
tandis que 1
waitinput
cas %umessage=16:pause
cas %menuitem=1:ocxPut(Document&,"charset","ISO-8859-1")
cas %menuitem=2:ocxPut(Document&,"charset","ISO-8859-5")
cas %menuitem=3:ocxPut(Document&,"charset","ISO-8859-7")
cas %menuitem :HTMLWin("Refresh",WebControl&)'--Aktualisieren chez Changement
settext %hwnd,ocxget(Document&,"charset")
endwhile
killtimer
ocxRelease(Document&,WebBrowser&)
destroywindow(WebControl&)
ocxDeInit()
qui Zuordnung qui Länder usw. dois du mais selbst vornehmen. Dabei hilft peut-être ca:
[...]
PS: comment cet "Rechts-Links"-Geschichte funktioniert, habe je sur qui Schnelle aussi pas rausgekriegt
SeeYou
Pascal |
|
| |
| |
| |
|
|
Julian
Schmidt | merci pour qui Mühen, je werde es mir im laufe des Tages la fois anschauen  |
|
| |
| ˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗˗ Webseite [...] | 20.03.2011 ▲ |
|
| |
|
(787)
Deutsch
English
Français
Español
Italia
