Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw

**RomeoAnfänger**

Warum bist du blockiert?
Versuche doch mal, dein konkretes Problem schriftlich nieder zu schreiben.
Gerne in einen anderen Thread.
Hast du mal mit Kommilitonen gesprochen? Wie haben die ihr Problem gelöst?
Dem Lehrenden/Professor kann man keine Frage stellen?

So sieht was ich für die Web services gemacht habe aus :

procedure TWebModule1.WebModule1AuthentifizierungAction(Send er: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
IdHTTP1:= TIdHttp.Create ;
IdHTTP1.ConnectTimeout:= 10000;
IdHTTP1.HandleRedirects := True;
IdHTTP1.Request.Clear;
IdHTTP1.Request.BasicAuthentication:= true;
IdHTTP1.Request.Authentication.Username := 'Username';
IdHTTP1.Request.Authentication.Password := 'Password';
Response := IdHTTP.Get(URL);
try
IdHTTP1.Get('http://qwerty.wur.nl');
HttpCode := IdHTTP1.ResponseCode;
except
on E: EIdHTTPProtocolException do
HttpCode := IdHTTP1.ResponseCode;

end;//Für die Authentification habe den obigen Code selber geschrieben ,aber es ist nicht vollständig .Ich glaube ,muss ein Resquest und Response schreiben ,aber ich weiß wie es geht .
end;
procedure TWebModule1.WebModule1DefaultHandlerAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
Response.Content:=
'<html>' +
'<head><title>Webserver-Anwendung</title></head>' +
'<body>Webserver-Anwendung</body>' +
'</html>';
end;// Das ist ein Default Web service und es ist unwichtig.

procedure TWebModule1.WebModule1SaveTimeStampAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
s: string;
begin
s := FormatDateTime('dd.mm.yyyy, hh:nn:ss', now);
ShowMessage(s);

FormatDateTime('dd.mm.yyyy, hh:nn:ss', now); // 31.12.1999 23:59:00
FormatDateTime('dd/mm/yy', now); // 31/12/1999
FormatDateTime('yy-mm-dd-hh-nn-ss', now); // 99-12-31-23-59-00

end;
end;// Hier möchte ich die Aktuelle Zeitstempel vom User (der User trägt seine Zeiten auf die App ein) in dem web Server (oder Server) speichern.Mit dem Resquest soll die Zeitstempel von App zu Server geschickt und Response soll eine Bestätigung zur App schicken,dass die Zeiten wurden im Server erfolgreich gespreichert .

procedure TWebModule1.WebModule1SeeTimeAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
//
end;// Hier muss ich ein Web service schreiben,das Zeit (von User) auf die App gezeigt ,das heißt ,der User soll seine gespeicherten Zeiten einsehen.

procedure TWebModule1.WebModule1SeeTripsAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
//
end;// Der User soll seine Fahrten auch einsehen können

procedure TWebModule1.WebModule1UpLoadPdfAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
//
end;// Ich habe auch hier keine Ahnung ,wie der Code aussehen soll , damit Pdf von Mobil App zu Web server hochgeladen wird .

procedure TWebModule1.WebModule1WebServiceFahrtenAction(Send er: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
//
end;// Hier soll der User seine Fahrten einsehen können.
// Fotos werden in dem Webserver hochgeladen und gespeichert.
procedure TWebModule1.WebModule1WebServiceFotoAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
http: TIdHttp;
multiStream: TIdMultiPartFormDataStream;
begin
// sendet eine Anfrage (Request) zum Hochladen eines Fotos
//Resquest :=
Response := IdHTTP1.Post('C:\Users\pc klinik\OneDrive\Desktop\SUdb\1.jpg',fmcreate);
//sendet eine Antwort (Reponse) zurück an den Client. Foto erfolgreich hochgeladen
//_--------------------------------------------------------

multiStream := TIdMultiPartFormDataStream.Create;
try
multiStream.AddFormField('field1', 'image/jpeg', '', sourceStream, 'image1.jpg');
multiStream.AddFormField('field2', 'value2');

http := TIdHttp.Create(nil);
try
http.Post(url, multiStream);
finally
http.Free;
end;
finally
multiStream.Free;
end;

end;// Und da habe ich den Code geschrieben ,aber es scheint nicht so komplett zu sein .

Der Professor hat nie mit Delphi programmiert und hat gemeint,dass ich googlen soll .Die Kommilitoten arbeiten mit anderen programmiersprachen und einer hat mir gesagt ,dass er selber sein Stress hat und soll im Forum dort fragen.

**TiGü**

1. Bitte benutze die Delphi-Codetags. Du kannst sie im Beitragseditor durch das Helm-Symbol erreichen (gelb-goldend mit rotem oberen Rand).
So liest sich das keiner durch.
2. Hast du gegoogelt? Unter den Stichwörtern "
delphi webmodule" finden sich unter den ersten Suchtreffern viel Dokumentation, Beispiele und Erklärungen. Das musst du alles lesen und nachvollziehen. Du kommst da nicht drum herum. Du scheinst irgendetwas technisches zu studieren. DAS IST TEIL DES JOBS! Das musst du später können und drauf haben. Du kannst später als Ingenieur auch nicht einfach die Arbeit outsourcen an jemand anderes. Wenn du das nicht bringst, ist es fraglich, wie du erfolgreich dein Studium abschließen willst. Wer schreibt dir denn die Bachelor/Master-Arbeit?
3. Mache am Besten einen neuen Thread im Forum auf, hier in der Job-Börse ist nicht die richtige Stelle.
4. Mag sein das du dich erst ein bisschen fortbilden musst in Sachen Webservice/-Module, aber ich vermisse in deinem gesamten Quelltext Ideen und Konzepte für die Datenstrukturen und die Anbindung an eine Datenbank oder ähnliches.
Wo sind deine Ansätze dafür?

**Olli73**

Du erstellst immer Objekte vom Typ TIdHttp. Das gehört i.d.R. in den Client, also deine Android App.

**RomeoAnfänger**

Zitat von Olli73:

Du erstellst immer Objekte vom Typ TIdHttp. Das gehört i.d.R. in den Client, also deine Android App.

Ich habe in meiner Palette kein THttp Komponent,denn ich habe Delphi Community .Wie kann ich die Objekte erstellen ?

**Olli73**

Du sollst die auf dem Server nicht erstellen!

**RomeoAnfänger**

Zitat von Olli73:

Du sollst die auf dem Server nicht erstellen!

Die Webservices sind (glaube ich) mit dem Server .Deshalb denke ich dass, die Objekte auf dem Server erstellt sind .

Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw

AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw

AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw

AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw

AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw

AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw

AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw

Stichworte

Forumregeln

Olli73 Registriert seit: 25. Apr 2008 Ort: Neunkirchen 793 Beiträge	#13 AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw 28. Jun 2020, 11:20 Du erstellst immer Objekte vom Typ TIdHttp. Das gehört i.d.R. in den Client, also deine Android App.
	Zitat

RomeoAnfänger Registriert seit: 29. Mai 2020 23 Beiträge	#14 AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw 28. Jun 2020, 13:25 Zitat von Olli73: Du erstellst immer Objekte vom Typ TIdHttp. Das gehört i.d.R. in den Client, also deine Android App. Ich habe in meiner Palette kein THttp Komponent,denn ich habe Delphi Community .Wie kann ich die Objekte erstellen ?
	Zitat

Olli73 Registriert seit: 25. Apr 2008 Ort: Neunkirchen 793 Beiträge	#15 AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw 28. Jun 2020, 13:28 Du sollst die auf dem Server nicht erstellen!
	Zitat

RomeoAnfänger Registriert seit: 29. Mai 2020 23 Beiträge	#16 AW: Suche Depli10.3 Rio -Expert für Web services und Einbindung mit App usw 28. Jun 2020, 14:11 Zitat von Olli73: Du sollst die auf dem Server nicht erstellen! Die Webservices sind (glaube ich) mit dem Server .Deshalb denke ich dass, die Objekte auf dem Server erstellt sind . Geändert von RomeoAnfänger (28. Jun 2020 um 14:38 Uhr)
	Zitat