Jump to content

Har gjort en egen webbläsare


Guest AdamZZ
 Share

Recommended Posts

Ska försöka med en bra design men är inte bra på det så nån som vill hjälpa ?? :ph34r:

startsida ska jag försöka att fixa (vet ej hur man gör ska kolla lite)

har ändrat till forward men inte orkat ändra bilderna

Redigerad av AdamZZ
Länk till kommentar
Dela på andra sidor

Du har använt komponenten "Microsoft Internet Controls" för själva webbläsaren, dvs har du infogat en kontroll som låter dig köra en instans av Internet Explorer (inte programmet, utan dess funktioner). Skapar du en egen webbläsare så programmerar du själva kärnan, dvs det som ansluter till webbplatserna, hämtar datan och slutligen renderar dem.

Du verkar inte ha så mycket kunskap inom VB6-programmering som du vill få andra att tro, allt som krävs för att skapa ett program likt det du har gjort är ett antal knapptryckningar och följande kod:

Private Sub Form_Load()

    WebBrowser1.GoHome

End Sub


Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As Integer)

    If KeyCode = vbKeyReturn Then

        WebBrowser1.Navigate Combo1.Text

        Combo1.AddItem Combo1.Text, 0

    End If

End Sub


Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)

    Combo1.Text = WebBrowser1.LocationURL

End Sub


Private Sub Form_Resize()

    WebBrowser1.Width = Form1.Width - 135

    WebBrowser1.Height = Form1.Height - WebBrowser1.Top - 450

    Combo1.Width = Form1.Width - 135

End Sub

Nu skrev jag detta lite hastigt, så jag har inte brytt mig om att varken kommentera koden eller namnge kontrollerna, men ni för i alla fall en inblick i hur simpelt något sådant är.

Jag vill inte förolämpa dig eller någon annan adamzz, fortsätt koda på du bara så du blir bättre på det du gör, i framtiden kanske du lyckas skapa något riktigt bra :teehee:

Edit: Lägger till en screenshot och en länk till exempel-programmet;

http://vigge.net/upl/Simple%20browser.zip

Redigerad av vigge
Länk till kommentar
Dela på andra sidor

Ja jag vet bara att trycka på några knappar men det är inte ett skal till internet explorer

detta är det första jag gjort med visual basic och jag ska lära mig mer men just nu vill jag få denna snygg o bra

Länk till kommentar
Dela på andra sidor

Väldigt lätt att göra Webbläsare som vigge sa....

Det räcker med dessa koder:

Webbrowser1.Stop = Stoppa sidan (läggs in i en knapp)

Webbrowser1.GoForward = Gå Framåt (läggs in i en knapp)

Webbrowser1.GoBack = Gå backåt (läggs in i en knapp)

Webbrowser1.GoHome = Gå till startsidan (läggs in i en knapp)

Webbrowser1.GoSearch = Öppna sök (läggs in i en knapp)

Webbrowser1.Navigate2 "www.google.se" = Kan läggas i FormLoad

Länk till kommentar
Dela på andra sidor

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Gäst
Skriv inlägg...

×   Innehåll kopierat inklusive formatering.   Ta bort formatering

  Only 75 emoji are allowed.

×   Din länk har expanderats till ett media-block.   Visa länk istället

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

×
×
  • Create New...