Master-Basti hat folgendes geschrieben: |
Hallo zusammen,
habe diese Prozedure, welche mit Daten gefüttert werden will
Zitat: |
procedure Check(const kdnr: Integer; const hash: WideString; var domain: WideString; var nservers: ArrayOf_xsd_string; out ret_code: Integer; out ret_msg_short: WideString; out ret_msg_long: WideString); stdcall;
| *6*
Habe jetzt folgendes Problem, bzgw. die Prozedure schon ein stückweit mit Daten gefüttert. Bloß geht es bei der Variable nservers nicht mehr weiter... es kommt folgende Fehlermeldung:
Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen
Hier mein Code:
Quelltext 1: 2: 3: 4: 5: 6: 7: 8: 9: 10:
| procedure TForm11.docheck; var inwxns : NameserverPortType; //1 server : ArrayOf_xsd_string; //2 begin server[0] := '******'; //3 server[1] := '******'; //3
inwxns := GetNameserverPortType(True); //4 inwxns.CheckNameserver(**','***',Edit1.Text, server[0]); //5 end; |
Ich bitte dringend um Hilfe! Danke schonmal!
Gruß
Sebastian |
Also.
1: Was ist NameserverPortType bitte? woher hast du das? woher sollen wir wissen was das ist?
2: Was ist ArrayOf_xsd_string ????? siehe oben
3: Was tust du da mit dem Server?
4: Was ist GetNameserverPortType?
5: Was ist CheckNameserver?
6: Was ist die Procedure Check, was tut sie, und warum benutzt du sie nicht, postest sie aber?
und last but not least: benutze bitte die Delphi tags statt die Code tags und formatiere deinen code, liefere uns alles, was wir wissen müssen und nicht nur kleine nichts sagende code schnipsel. danke...

[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.