[Pytanie] Wstawienie obrazka z linka do programu.

[Cooleka]

Siemka.

 

Tak jak w temacie.

 

Mam np link do obrazka http://... .png i chciał bym, aby on był ładowany z serwera www, a nie wgrany przeze mnie.

 

Drugim wyjściem może być takie coś, co widziałem kiedyś w googlach, lecz nie orientowałem się za bardzo czy mi się przyda, że jest wartość jakaś podana na stronie www np 19 i program ją odczytuje.

 

Pozdrawiam @Kamil

[Gość]

Windows Forms czy WPF?

[Cooleka]

Windows Forms, ale proszę o info do obu.

[Sunnyline2]

Windows Forms, ale proszę o info do obu.

 

Dim Client as new WebClient
Dim Source As String = Client.DownloadString("http://tajnąstronkąporną.pl/img.png")
Dim Destination As String = "Imejdz.png"
Client.DownloadFile(Source, Destination)
Client.Dispose
PictrueBox1.Image = Destination
 

 

 

Może będzie chodzić ale będzie chujnia straszna..

[Cooleka]

Nie śmiga :/
Chodzi mi głównie o obrazek z gametrackera (pokazuje ilość graczy na serwerze)

[Maciek2699]

PictureBox1.Image = New System.Drawing.Bitmap(New IO.MemoryStream(New System.Net.WebClient().DownloadData("link z http")))

[Sunnyline2]

Nie śmiga :/

Chodzi mi głównie o obrazek z gametrackera (pokazuje ilość graczy na serwerze)

Dim Client As New WebClient

Dim Source As String = Client.DownloadString("http://tajnąstronkąporną.pl/img") 'tutaj bezpośredni link do obrazka

Dim Destination As String = "Imejdz.png"

Client.DownloadFile(Source, Destination)

Client.Dispose()

PictureBox1.Image = System.Drawing.Image.FromFile(Destination)

End Sub

[Maciek2699]

E tam szfagier, zajedziesz ten swoj komputerek :P

PictureBox1.Load("link z http")

 

I gitara :P

[StuSto]

Działa mi odpalanie tego obrazka a jest mozliwosc ze np pod przyciskiem "Zapisz" Zapisuje sie on jako png?

[Maciek2699]

jasne, mozesz podawac bezposrednia lokalizacje

PictureBox1.Image.Save("C:\Nazwapliku.png", System.Drawing.Imaging.ImageFormat.png)

albo uzyc savefiledailog i zamiast lokalizacji docelowej .FileName

[StuSto]

Yyy troche nie rozumiem możesz podac src tak jak ma to wyglądac? z tym savefiledialog w savefiledialog mam taki kod

	Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
SaveFileDialog1.Filter = "TXT  (*.txt*)|*.txt"
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK _
     Then
My.Computer.FileSystem.WriteAllText _
(SaveFileDialog1.FileName, TextBox1.Text, True)
End If
End Sub

gdzie mam dodać

PictureBox1.Image.Save("C:\Nazwapliku.png", System.Drawing.Imaging.ImageFormat.png)

?

[Maciek2699]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim sv As New SaveFileDialog

sv.Filter = "Obrazek PNG (*.png*)|*.png"

If sv.ShowDialog = DialogResult.OK Then

PictureBox1.Image.Save(sv.FileName, System.Drawing.Imaging.ImageFormat.Png)

End If

End Sub