Hey
Ich spiele gerade mit meinem
standart http Restserver den ich erstellt habe.
Ich versuche eine Postfunction am Server zu schreiben, der eine mit
Indy gesendete TstringList akzeptiert.
Nun finde ich aber kein Beispiel das richtig Umsetze.
Delphi-Quellcode:
function TServerMethods1.updateEchoAttribute1(Key: String;
Value: string): String;
begin
Result:= 'updateEchoAttribute1 ' + Value;
end;
wenn ich nun
Delphi-Quellcode:
procedure TfrmConnectRLServer.btn5Click(Sender: TObject);
var
LsList: TStringList;
begin
LsList := TstringList.Create;
try
LsList.Add('
Attr1=2') ;
mmo1.Lines.Add(idhtp1.Post('
http://localhost:8080/datasnap/rest/TServerMethods1/EchoAttribute1/',LsList));
finally
LsList.Free;
end;
// try
end;
sende, bekomme ich nun einen 500 internal Server error.
Hat jemand ein Praktikables Beispiel für mich an dem ich üben kann?
Gruß
SM
