Hallo,
ich probiers mal
:
Die dynamischen arrays brauchst Du nicht per create zu erzeugen. Du hast nirgends ein setlength stehen, das fehlt Dir. ganz normal mit setlength die arraygröße einstellen und dann mußt du jedes Element des array mit create erzeugen, bevor du es füllst. Du übergibst ein komplett leeres array = Nil und bekommst deshalb die
Exception.
Delphi-Quellcode:
setlength(Array_busRelFinding,1);
Array_busRelFinding[0]:=AxdEntity_BusRelFinding.create;
Array_busRelFinding[0].AVA_SAPAccountNum:='123456789';
findings.busRelFinding:=Array_busRelFinding;
Zitat:
Abfrage:= HTTPRIO as TestFacade;
versteh ich nicht. in deinem Importcode fehlt auch eine Zeile, da muß im interface Teil als letztes eine solche function stehen:
function GetIXYZ(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): ITestFacade;
und in deinem ButtonclickCode sollte dann als erstes stehen
Abfrage:=GetIxyz(false,'',Nil*);
* oder du hast selber einen Rio erstellt, wenn du z.B. die Request/Response mitschneiden willst, oder ihn zur Authentifizierung brauchst.
Zitat:
Antwort := TestFacade1.EntityKey.create;
brauchst du nicht.
Gruß Frank