Discussion :

[SubZero2]

Bonjour,
J'ai developpé un WebService avec Delphi6 dans lequel j'ai une fonction qui me renvoi un TStringDynArray ( parait que ca marche bien ) !

Quand je consomme ce WS avec une interface Win32 je fait ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
var
  Resultat: TStringDynArray;
  i: integer;
begin
  Resultat := SM.RecherchePlans(Langue, Role, PrefRole, TechClass, CriteresDemande, CriteresTechnical, NbResultat);
  For i := 0 to Length(Resultat) - 1 do
    ShowMessage(Resultat[i]);
end;

Tout ca marche tres bien, meme sans initialiser "Resultat".

Par contre quand je fais la meme chose dans D2005, et bien il me dit :

La référence d'objet n'est pas définie à une instance d'un objet.

et plante sur le ShowMessage ...

Quelqu'un aurait une idée de pourquoi la fonction ne me renvoi rien en .net et pas en Win32 ???

Merci !

[SubZero2]

Personne se sent inspiré ?
Ma question n'est elle pas clair ? C'est possible ...

[Laurent Dardenne]

Salut,
si je me souviens bien ce message indique que l'objet n'est pas initialisé mais je n'en suis pas certain.
Quelle exception au juste ?

[SubZero2]

Yep ! C'est ca !
En fait, j'ai laisser tombé un pti moment et la je m'y suis remis ...
C'est juste que le webservice developpés avec D6 ne peuvent pas renvoyer de tableau dyunamique de type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

toto: array of string;

Il faut utiliser des TStringDynArray.
Si une fonction du WS renvoi un TStringDynArray, pas besoin de l'initialiser dans le client, le WS la renvoie toute bien comme il faut !

Par contre une application .net ne connait pas les TStringDynArray, on doit declarer un type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

TMyArrayOfString: array of string;

En gros j'ai refait le webservice en .net et hop ! Comme ca je ne passe que des type connu par le WS et l'appli web...

[Laurent Dardenne]

Par contre une application .net ne connait pas les TStringDynArray,

Si dans l'unité Borland.Vcl.Types

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TStringDynArray       = array of string;

Après réflexion je pensais que le pb venais de l'échange de chaine de type String Win32 et String .NET.
Comme je ne connais pas les WS je resterai prudent quant à l'interprétation à donner à ce pb mais je suis vraiment curieux de comprendre comment ça fonctionne entre les 2 plateformes...

[SubZero2]

Par contre une application .net ne connait pas les TStringDynArray,

Si dans l'unité Borland.Vcl.Types

Oui d'accord mais ca ne passe pas bien du tout !
Le WS Win32 ne renvoi pas le tableau "dimensionné" a l'appli .NET ...
J'ai pas reussi a faire cohabiter les deux ...

[Laurent Dardenne]

Plutôt curieux comme problème

[SubZero2]

oui je suis d'accord ... obscur je dirai meme !