Hallo ich habe Beispielcode in VB. Das muss ich jetzt umsetzen in Delphi 7
Da ich noch nichts im Bereich Delphi/HTTP gemacht habe, brauche ich hier ein wenig Hilfe, vielleicht genügt auch ein kleiner Denkanstoß
VB-Quellcode-Beispiel:
-------------------------------------------------
Delphi-Quellcode:
Public Function CheckDevice()
As String
Try
Dim request
As HttpWebRequest = _GetHttpWebRequest("http:
//" + _configuration.ServerIpAddress.ToString, "GET", True, True,
_configuration.Username, _configuration.Password)
Dim response
As HttpWebResponse
request.Timeout = 5000
'
request the start page from the sortex web server
response = DirectCast(request.GetResponse(), HttpWebResponse)
Return String.Empty
Catch ex As Exception
Return ex.Message
End Try
End Function
-------------------------------------------------
Wie kann man sowas umsetzen ? Es geht darum Daten mit einer Maschine auszutauschen, die einen WebServer integriert hat. Das Beispiel ist nur eines von vielen Funktionen die ich umsetzen soll.
Vielen Dank im voraus
