Zdravím, potreboval by som odstrániť Scrollbars v applikácií, ktorá používa WebBrowser komponentu vo VB.
Štandardne táto komponenta nemá takúto možnosť, ale dá sa to docieliť napr. pomocou:
Private Sub webBrowser_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim Docu As Object
Set Docu = webBrowser.Document
On Error Resume Next
Docu.body.Scroll = "No"
' alebo tiež priamo pomocou webBrowser.Document.body.Scroll = "No"
On Error GoTo 0
End Sub
No mňa by zaujímalo, ako by sa to dalo nastaviť, keby som chcel názov "tagu" aj jeho hodnotu nastaviť pomocou premenných.
To znamená, že "body.Scroll" aj "No" by som mal uležené v premenných, ktoré by som načítaval napr. z ini súboru, a tie by som potom použil v aplikácií na webBrowser.Document objekt.
Zámer je, aby si užívateľ mohol dynamicky nadefinovať hodnoty niektorých vlastností a neboli by natvrdo kódovné.
Skúšal som niečo pomocou PropertyBag alebo PutProperty, ale nakoľko som z toho lama nepodarilo sa mi s tým nič docieliť.
Fórum › Visual Basic
WebBrowser komponenta a Scrollbar
Zjistit počet nových příspěvků
Přidej příspěvek
Toto téma je starší jak čtvrt roku – přidej svůj příspěvek jen tehdy, máš-li k tématu opravdu co říct!
Ano, opravdu chci reagovat → zobrazí formulář pro přidání příspěvku
×Vložení zdrojáku
×Vložení obrázku
×Vložení videa
Aktuálně jsou podporována videa ze serverů YouTube, Vimeo a Dailymotion.
×
Uživatelé prohlížející si toto vlákno
Uživatelé on-line: 0 registrovaných, 11 hostů
Podobná vlákna
ScrollBar — založil DeathHumanCZ
Vertikalni scrollbar — založil tribalcz
Jak odstranit H+V scrollbar — založil Petroff
Moderátoři diskuze