Bild (oder Datei) von externem Server laden

Hallo,

folgendes Szenario liegt an:

Xojo (im debug mode) auf einem Mac (OSX 10.8) versucht von einem externen Server (WIN7)
eine Datei zu laden:

[code] Dim path As String
Dim picFile As FolderItem
Dim pic As Picture

’ path = “/Volumes/C/xampp/htdocs/Assets/bild.png”
’ path = “http://192.168.0.55/Assets/bild.png
’ path = “file:///Volumes/C/xampp/htdocs/Assets/bild.png”

’ picFile = New FolderItem(path, FolderItem.PathTypeAbsolute) // depricated
’ picFile = New FolderItem(path, FolderItem.PathTypeNative)
’ picFile = New FolderItem(path, FolderItem.PathTypeShell)
’ picFile = New FolderItem(path, FolderItem.PathTypeURL)

If picFile <> Nil Then

pic = Picture.Open(picFile)

End If[/code]

Ist der Mac nicht mit dem Windows-Rechner verbunden, greift keine
der o.a. Varianten. Nur wenn zuvor auf dem Mac eine Verbindung zum Win hergestellt ist,
funktioniert diese Variante mit

… ' path = "file:///Volumes/C/xampp/htdocs/Assets/bild.png" ' picFile = New FolderItem(path, FolderItem.PathTypeURL) …
oder diese

… ' path = "/Volumes/C/xampp/htdocs/Assets/bild.png" ' picFile = New FolderItem(path, FolderItem.PathTypeShell) …

(Zum Testen habe ich das Bild mit “http://192.168.0.55/Assets/bild.png” im Browser erfolgreich abrufen können)

Aber später soll die Desktop-App die Bilder aus der Cloud ziehen …

Warum nimmst du denn nicht ein HTTPSocket und ldst das Bild ber die URL wie im Browser?

Picture.Open nimmt zwar Folderitems und das Folderitem lsst sich aus einer URL bauen, aber es wird nicht eine Netzwerkverbindung aufbauen, sondern nur lokale Dateien ffnen.

Gru
Christian

Hallo Christian,

ging ja schnell :slight_smile:

soweit habe ich’s:

[code] Dim http As New HTTPSocket
Dim data As String

data = http.Get(“192.168.178.13/Assets/bild.png”, 30))

’ MeinBild ist ein Canvas
Self.MeinBild.Backdrop = ’ Wie wird jetzt aus data das Picture?

[/code]

schau mal
http://documentation.xojo.com/index.php/Picture.FromData

OK, manchmal dauert’s etwas lnger :slight_smile:

Danke!