Hallo,
ich bastle grad an einem Webservice in D7.
Ich habe eine Funktion die mir eine Liste an Informationen übermitteln muss.
Zuerst wollte ich der Funktion eine Stringliste zurückgeben lassen, das hat aber beim Client nicht funktioniert.
Dann hab ich mir gedacht, ich gebe ein Array of String zurück, funktioniert aber auch nicht so wie gepant.
Hierfür habe ich den Typ "TUsers = array of String" deklariert. Aber leider bringt mir der Compiler die Meldung:
[Fehler] ADImpl.pas(58): Inkompatible Typen: 'String' und 'TUsers'
Ich steh gerade irgendwie auf dem Schlauch, kann mir jemand weiterhelfen? Bzw. hat jemand eine bessere/elegantere Lösung?
Vielen Dank
ich bastle grad an einem Webservice in D7.
Ich habe eine Funktion die mir eine Liste an Informationen übermitteln muss.
Zuerst wollte ich der Funktion eine Stringliste zurückgeben lassen, das hat aber beim Client nicht funktioniert.
Dann hab ich mir gedacht, ich gebe ein Array of String zurück, funktioniert aber auch nicht so wie gepant.
Hierfür habe ich den Typ "TUsers = array of String" deklariert. Aber leider bringt mir der Compiler die Meldung:
[Fehler] ADImpl.pas(58): Inkompatible Typen: 'String' und 'TUsers'
Code:
type TUsers = array of String; function TAD.GetUsers(const Bindstring: string): TUsers; stdcall; var user: TStringList; i: integer; user_arr: array of TUsers; begin user := TStringList.Create; user.Assign(Webmodule1.AD1.GetUsers()); SetLength(user_arr,user.Count); for i := 0 to user.Count - 1 do user_arr[i] := user.strings[i]; Result := user_arr; user.Free; end;
Vielen Dank
Comment