Böngésző saját kezűleg - Delphi forrásból gyik

Nem értem - minden világít minden piaci körül az interneten böngésző háború. Azaz, Ns, Opera. Minden ott valami éppen kiválasztva. Van ez a probléma nem érdekel, el tudom képzelni magam, hogy írjon a böngésző - így például szeretnék. És te gyenge? Nem hiszem. Tíz perccel később, akkor is lesz a navigátor.

Meg kell újra kezdeni Delphi. Ez lehetővé teszi, hogy egy nagyon gyors és nem túl nagy baj, hogy írjon saját böngészője. Amikor elkezdi, meg egy lapon „Internet”. Ott kell lennie „WebBrowser” komponens (ez legyen az utolsó). Ha van egy változata Delphi kevesebb mint egyötöde, akkor ez az összetevő nem lehet. Lehet, hogy nem lesz elérhető, és ha nem akarsz telepíteni az Internet-komponens (vannak beállítva az alapértelmezés).

Válassza ki a "Import ActiveX Control", a "Component" menüben.

A kiválasztási lista az ablak (fent) Keresse meg a sort a „Microsoft Internet Controls (1.1 verzió)”. Verzió eltérő lehet, de te és én - az Aqualung. Most kattintson az „Install” gombra. Mielőtt megnyit egy ablakot, és egy kérés. Kérésre meg kell válaszolni: „Igen”.

Miután Delphi proshurshit agy, egy ablak jelenik meg, amely tájékoztatja a sikeres telepítés egy új alkatrész. Kattintson az „OK”, és zárjon be minden nyitott Delphi. Ehhez válassza ki a „Close All” a „Fájl” menüben. Most van a komponens „WebBrowser”, csak ez található a „ActiveX” oldalon a komponens palettán.

Ahogy talán már észre, mi fog használni a „Microsoft Internet Controls”, azaz motor a számítógépre telepített IE. És ez azt jelenti, hogy a böngésző felveszi a betegségek és a hibákat a motor. Az egyetlen dolog, ami képes megnyugtatni - az a tény, hogy a felület nem lesz olyan unalmas. Ő lesz, ahogy akar, mert ez által a kezét.

Most már készen áll a programozás. Hozzon létre egy új projektet ( „File” -> „Új alkalmazás”), és azonnal megváltoztatni a címet és ikon. Hogy ez megtörtént, azt mondta a cikk a mega-médialejátszó ugyanabban a szobában.

Áttérve. Állítsa be az alakja a komponens „WebBrowser” (ez található a lapon „Internet” vagy „ActiveX”) - akkor egy fehér négyzet a neve WebBrowser1. Ezt követően, dobd formájában „CoolBar”, amely a „Win32” fülön a komponens palettán. Ez az aljzat, amely összehangolja a felső széle az űrlapon. Most Mark WebBrowser1 és megy ObjektumLekérdező. Kattintson a tulajdon „align” a legördülő listából válassza ki a „alClient”. „WebBrowser” ki kell terjeszteni az egész tér keletkezik.

Most leadott CoolBar1 (nemrég telepített formában) panel „eszköztár” fülén „Win32” és a „ComboBox” a fül „Standart” komponens palettán. Mindez annyit kell hajítani a CoolBar1, különben kapsz szar. Ezután ki kell választani, és adja meg a CoolBar1 ObjektumLekérdező. Itt meg kell változtatni a vonal „autoSize'” „true” (az alapértelmezett „false”).

Ha valami nem működik, akkor olvassa el a cikket újra. Ha ez nem segít, akkor próbálja dobni egy sört, ez segít gondolkodni :). Ha minden rendben van, akkor kiosztja ComboBox1 (legördülő lista), valamint bejut ObjektumLekérdező. Itt kell kiemelni a lap „Események” és végre komplex intézkedések „onkeydown” DoubleKlike on-line. DoubleKlike kell tenni a jobb oldalán a sor. Ha nem emlékszik, hol lehet „jobb” :), majd kattintson a legördülő listából (ez a „helyes”). Mint korábban, Delphi létrehoz egy eljárást. Ez lesz az úgynevezett minden alkalommal meg kell adnia minden betű a „ComboBox”. Itt meg kell írni a következőket:

FIGYELEM! Gépelés billentyűzet csak akkor szükséges, hogy mi van írva a kezdési és befejezési minden mást kell létrehozni a Delphi. Ebben az esetben meg kell tárcsázni csak a „ha Key = VK_RETURN majd WebBrowser1.Navigate (ComboBox1.Text)”, idézőjelek nélkül. Idézem csak a maradék vonalakat, hogy érzi magát bámulni, és hasonlítsa össze azzal, amit tesz Delphi az Ön számára.

Most ugyanaz a dolog, de a fogalmak:

Javítása a böngésző

Kattintson Eszköztár1, és újra belép a ObjektumLekérdező. Itt meg kell változtatni a tulajdonságait a „autoSize'”, „ShowCaption” és a „lapos”, hogy „igazi” (alapértelmezés ezek mind hamis). Most a jobb gombbal a Eszköztár1 és menük megjelenését válassza ki az elemet az „Új” gombot. A Eszköztár1 meg kell jelennie az új Pimp „ToolButton1” nevet. Jelölje ki és ObjektumLekérdező-e megváltoztatása Caption tulajdonságot „Megnyitás”. Hozzon létre egy másik gombok képaláírásokkal: Vissza, Előre, állandó, frissítése, és a nyomtatás.

Telepítse egy másik formája a „OpenDialog” fülén „párbeszédablakok” komponens palettán. Ő hamarosan szüksége van ránk.

Most, a „Megnyitás” Kattintson duplán a gombra, és a Delphi automatikusan létrehoz egy eljárást, amely fogják hívni, ha a gomb megnyomása után. Ebben az eljárásban meg kell írni a következőket:

Mint mindig, most magyarázza a fogalmakat:

Most lehet futtatni egy programot, és nyissa meg ezt a Pimp semmilyen fájlt a lemezen. De úgy gondolom, hogy nem kell sietni. Kénytelenek dolgozni a többi gomb! „Vissza” Kattintson duplán a gombra. Mi lesz az eredmény, akkor már kitalálta. Kérjük írja ide a következő:

Azt hiszem, nem kell magyarázni semmit itt. Csak hogy WebBrowser1 menni az előző oldalra.

Ismételjük meg a műveletet a „Forward” gombra, hogy egy eljárást. Írja be az alábbi kódot, hogy:

A „Stop” gombot ír: „Állandó még fütyült az égen, kezében az oldala.” Csak vicceltem :). Írja jobb ez:

Csak egy vonal, de ez nagyon bonyolult, ezért nem fogom elmagyarázni. Csak azt tudom mondani, hogy ebben a sorban, küldök egy parancsot az OLE IE mag. Csak másolja egyesével a forráskódban, és megteszi a szavam.

Most akkor nyomja meg a „F9”, és a program futtatásához. Próbálja játszani vele. Jó érzés? Bezárja a böngészőt, arra az utolsó simításokat!

Böngészője majdnem kész. Csak hogy egy kis marafet.

A kezdéshez leadott StatusBar formájában lapok „Win32” és a változás az ő tulajdonát „SimplePanel” true (alapértelmezett false). Most Mark WebBrowser1 és kattintson a lapon az „Események” ObjecInspector th. Kattintson duplán a vonal „OnStatusTextChange”, és írja létre a következő eljárás szerint:

Itt állítsuk a változót „Text” (ez tartja a tooltip szöveget) StatusBar1. Most már láthatja a tippeket az állapotsorban.

Adjunk hozzá további terhelést jelző. Ehhez dobd formájában könyvjelzők Folyamatsáv „Win32”. Változás az ő tulajdonát „align” on „alBottom”, hogy ez alján formában határon. Ismét Mark WebBrowser1 és kattintson a lapon az „Események” ObjecInspector th. Kattintson duplán a vonal „OnProgressChange”, és írja be a megállapított eljárás szerint:

Itt hoztunk létre ProgressBar1 (terhelés indikátor) beállítása a maximális értéket (ProgressMax) és az aktuális érték (Progress).

Most meg kell díszíteni a gombok, de úgy néznek ki, mint ő maga IE. Ehhez dobd a forma, és ImageList rajta DoubleKlik. egy ablak nyílik meg előtted. Itt meg kell adni kép 16x16. Ehhez kattintson az „Add”, és mielőtt megnyitná a szabványos ablak megnyitni a fájlt. Keressen egy képet, és kattintson a „Megnyitás”. Ismételjük ezt a folyamatot 6-szor (6 képek 6 és gombok). Mindezek után, kattintson az „OK” gombra.

Most Mark Eszköztár1 és ObjektumLekérdező-e Képek szerkesztése tulajdonságot „ImageList1”. A gombok jelennek meg a képeken. Ha hozzá képeket, nem abban a sorrendben, az általuk állsz a formában, akkor átrendezheti őket a ImageIndex tulajdonságok a gombot. Például: Kattintson a „Stop” és a változás ImageIndex 0. A gomb kép jelenik meg, és az első ImageList1.

Akkor hozzon létre egy másik ImageList, amihez a HotImages. Ebben az esetben a kép ennek ImadzheLista kiszorítja a gombra, ha hoz neki Mouse.

Minden javítás befejeződött. Nyomja meg a „F9”, és a Delphi volt az utolsó alkalommal, amikor jön létre a végleges változat.

Élvezheti a teljes értékű böngésző az öröm. Természetesen ez nem minden funkció, hogy lehet vytsepit a WebBrowser1. Ez még mindig nagyon lehetséges, hogy adjunk - a legfontosabb dolog, hogy van elég fantáziája és készségeket. De ez a részleteket, és nem írom le őket, mert akkor meg kell magyarázni a alapelveit programozás Delphi. És ez - az egész történetet. Írj nekem, ha ez, és sok szerencsét!

Ő lesz, ahogy akar, mert ez által a kezét.