- Apple Watch
- Bemutatkozott a Poco X7 és X7 Pro
- Csak semmi szimmetria: flegma dizájnnal készül a Nothing Phone (3)
- Google Pixel 9a - a lapos munka
- Apple iPhone 16 Pro - rutinvizsga
- One mobilszolgáltatások
- Okosóra és okoskiegészítő topik
- CMF Buds Pro 2 - feltekerheted a hangerőt
- Milyen okostelefont vegyek?
- A Galaxy Z Fold7, minden színben és oldalról
Aktív témák
-
#22
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Valaki!!!!!
-
#21
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Kösz a tippet! Felmerült egy újabb gondom. Ha a webbrowser onwindow2 eseményébe meghívok egy másik ablakot akkor működni kellene rajt a felugrómümnek nem? Vagy ezt is le kell vhogy másképp kezelni?
-
#20
Diskcopy
tag
Zsolteeeee
#19
Diskcopy
tag
válasz
Zsolteeeee
#19
üzenetére
-
#19
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Üdv! Akadt egy kis problémám. Webbrowserről képet lementeni mivel lehet? Kipróbáltam egy ilyet: clipboard.assign(WebBrowser1.OleObject.Document.Images), ez így összeférhetetlenséget írt ki. Légyszi valaki mondjon egy másik ötletet.
-
#18
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Kössz az infókat. Asszem ezzel elleszek egy ideig. Szavadon foglak. Ha problémám van majd szólok. Kössz előre is a segítséget.
-
Diskcopy
tag
GetClassName(PMOUSEHOOKSTRUCT(lParam)^.HWND, szClassName,
SizeOf(szClassName));
if lstrcmp(@szClassName[0], @ie_name[1]) = 0 then
ahogy látod itt használja.. Mouse Hooknál kell és azért kell, hogy mi az ahol ez történjen.. Ennek a Classnak eza neve, amit ott megadott felül.. Bonyolult elmagyarázni, de így kell csinálni és kész
GetClassName(PMOUSEHOOKSTRUCT(lParam)^.HWND, szClassName,
SizeOf(szClassName));
if lstrcmp(@szClassName[0], @ie_name[1]) = 0 then -
Diskcopy
tag
Na adok még neked ilyeneket, látom komplett böngészőt akarsz csinálni
Kedvencekhez adás: Bővebben: link
JavaScript hívás Bővebben: link
Postolás TwebBrowserral Bővebben: link
HTML kód mentése Bővebben: link Ha valami kell még szólj -
#13
Diskcopy
tag
Zsolteeeee
#12
Diskcopy
tag
válasz
Zsolteeeee
#12
üzenetére
Kukkantsd meg pl ezt.. ez szövegkeresés a weboldalon. Bővebben: link ilyesmire gondoltál?
meg nézheted mondjuk ezeket is: Bővebben: link
Bővebben: link
[Szerkesztve] -
#12
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Üdv! Megtudná nekem mondani vki, hogy a webbrowser-ben lévő szöveget mivel lehet lekezelni? Valahol azt olvastam, hogy a seltext metodussal ez lehetséges, csak az a nagy gond, hogy nem tom ezt hogy kell használni. Ja a sima widestringet letudja kezelni a string is?
[Szerkesztve] -
#11
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Köszike. Ez tök sirály saját felugrómenü!!!!!!!! Egypár ilyen oldalt nem tudnál küldeni nekem ahol ilyen dolgok találhatók. Még egyszer kössz.
[Szerkesztve] -
Diskcopy
tag
Na, találtam neked konkrét sourcet. Viszonylag rövid is.. Bővebben: link
amint látod ez egy saját popupmenu-t használ, amit te raksz le a formra.
Result := HC_SKIP;
Form1.popupmenu1.popup(X, Y); <-- Itt hivatkozik rá, tehát ha te nem popupmenu1-re nevezed el a komponenst(popupmenu.name) akkor itt írd át. Remélem most már minden ok
[Szerkesztve] -
#9
Diskcopy
tag
Zsolteeeee
#8
Diskcopy
tag
válasz
Zsolteeeee
#8
üzenetére
Ja, hogy neked külön felugró menü kell. Nem próbáltad ki, hogy leteszel egy popup menüt és a TWebBrowser popupmenü propertyhez megadod azt? azt még próbáld már ki légyszi, akár a a linkelt példán is.
-
#8
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Megpróbáltam, de nálam így még felugró menü sem jött elő. Amit küldtél programot abban sem volt felugrómenü.
Lehet, hogy hülyeséget kérdezek, de a forrásban lévő ''stdcall'' nem egy dll-re utal? -
#7
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Kössz megpróbálom. Remélem jó lesz.
-
Diskcopy
tag
Itt egy másik megoldás. ezt teszteltem: Bővebben: link
-
Diskcopy
tag
Talán ez? :
function IERestrictionsSettings(Key: string; Disabled: Boolean): Boolean;
var
reg: TRegistry;
begin
Result := TRUE;
Reg := TRegistry.Create;
with Reg do try
RootKey := HKEY_CURRENT_USER;
OpenKey('Software\Policies\Microsoft\Internet Explorer\Restrictions',
True);
WriteInteger(Key, Integer(Disabled));
CloseKey;
except
Result := FALSE;
end;
Reg.Free;
end;
function DisableContextMenu(Disabled: Boolean): Boolean;
begin
Result := IERestrictionsSettings('NoBrowserContextMenu', Disabled);
end;
Ezt meghívod programfutásnál True val, aztán kilépésnél false-al. Hátha -
#4
Alan
aktív tag
Zsolteeeee
#3
Alan
aktív tag
válasz
Zsolteeeee
#3
üzenetére
Szerintem egyszerű módszerrel nem lehet kiküszöbölni, mert a TWebBrowser komponens mögött a beépített Internet Explorer húzódik meg, ezért a felugrómenüi is az IE által használt menük lesznek.
-
#3
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Ezt ismertem már, ez is tök jó lenne, ha az általam a webbrowserhez rendelt felugrómenüt megtartaná, nem pedig a Windows alól kiszedett menüt használná. Nem tod hogyan lehetne ezt kiküszöbölni?
-
#2
heihachi
addikt
Zsolteeeee
#1
heihachi
addikt
válasz
Zsolteeeee
#1
üzenetére
Bővebben: link Valami ilyesmi, de lehet, hogy nem erre gondoltál.
-
#1
Zsolteeeee
csendes tag
Zsolteeeee
csendes tag
Hello mindenkinek. Delphivel Webböngészőt próbálok készíteni, de valami oknál fogva nem működik a Delphi Webbrowser-je által használt felugró menüben a másolás gomb. Ezzel csak annyit akarok mondani, hogy a kimásolt szöveget nem másolja fel a váólapra. Segítsetek mitől van ez? Ha valaki meg tudná nekem mondani, hogy, hogy tudok magam felugrómenüt készíteni webbrowser alá annak is örülnék. Előre is kössz!
Aktív témák
Hirdetés
- Lenovo ThinkPad T14 3 Gen 16/256GB SSD, Újszerű, 1 Év Garanciával
- Telefon felvásárlás!! iPhone X/iPhone Xs/iPhone XR/iPhone Xs Max
- BESZÁMÍTÁS! Asus A520 R5 3600 16GB DDR4 500GB SSD RTX 2060 8GB Rampage SHIVA CoolerMaster 700W
- Fotós felszerelés - Stúdió lámpa / Softbox / Vaku
- Bomba ár! HP ProBook 430 G8 - i5-1135G7 I 16GB I 256GB SSD I HDMI I 13,3" FHD I Cam I W11 I Gari!
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Promenade Publishing House Kft.
Város: Budapest