Registriert seit: 5. Mär 2014
165 Beiträge
Delphi 10.2 Tokyo Architect
|
AW: RestServer Antwort Json ohne "[" Klammern
3. Feb 2016, 14:07
Dann könnte die function so aussehen
Delphi-Quellcode:
function TServerMethods1.updateHddCrawler(Key: string; aJSONObject: TJSONObject): TJSONObject;
var
LJSONObject: TJSONObject;
s: string;
begin
Result := TJSONObject.Create;
try
if KeyValidation(Key) then frmHddCrawler.AnalyzeJson(aJSONObject,Result)
else Result.AddPair('error', 'invalid key') ;
except
Result.Free;
raise;
end;
end;
Einwände?
Geändert von ScharfeMietze ( 3. Feb 2016 um 14:10 Uhr)
|