Discussion :

[RIVOLLET]

Bonjour tout le monde,
Je viens de me mettre à Delphi 6. J'étais très habitué à Visual basic, et j'avoue que le passage de l'un à l'autre me pose des problèmes.

Je ne comprends pas la gestion de l'allocation de mémoire pour les différents types de variable ! Je vais essayer d'être un peu plus clair.

Dans une procédure, j'ai cru comprendre que si je déclare une variable, un place mémoire lui est affectée, et ainsi, je peux l'utiliser dans toute la procédure à ma guise ... Seulement je me rends compte qu'à certains moments, la valeur affectée à la variable est modifiée, comment ? j'en sais rien !

J'ai pas mal d'expérience sous VB et la gestion des variables locales et globales ne me posaient pas de problèmes !

Par exemple, voilà un exemple qui me laisse dubitatif !

ex.
procedure Form1.Test()
var VARI : Integer;
var tempStr : String;
begin
For VARI :=0 To 7 do
begin
tempSTr := iwrite(1,'Coco');
ShowMessage (IntToStr(VarI) + ' : ' + tempStr);
end;
end;

Remaque
iwrite est une fonction "correctement définie" (test à l'appui) faisant appel à un fichier dll pour communiquer avec un appareil de mesure.

Le problème que je rencontre dans ce cas est le suivant :
le programme compilé, ne sort jamais de la boucle FOR car VarI ne passe pas de 0 à 7, mais prend des valeurs absurdes ... (105, 1328, ..)

Je n'utilise même pas ce nom de variable dans la fonction iwrite ...

Ce n'est pas le seul cas que je ne comprends pas, d'une façon générale, j'ai l'impression que dès que j'appelle une fonction, les variables locales et globales changent ...

Si quelqu'un a compris ce que je demande, peut-il m'aider :

Merci ...

Rfab

[Pierre Castelain]

Ca m'a l'air d'un problème de débordement. Il semblerait (avec le peu d'information dont on dispose) que la fonction iwrite écrive un peu n'importe où dans la mémoire et par malchance dans la variable controlant la boucle. Pour le vérifier, il suffit d'effectuer un test simple consistant à remplacer la ligne d'appel à iwrite par autre chose, par exemple:

Code :

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

  tempStr:= 'Test' + IntToStr(VARI);

Cela permettra au moins de déterminer si le problème vient de là.

PS: je réalise maintenant qu'il est également possible que le problème vienne de l'affectation de la valeur retournée par iwrite à la variable tempStr, même si c'est peu probable.

[Smortex]

Ta fonction "correctement définie" n'utilise pas de string j'espère ! Sinon, c'est sûr ! Ca ne fonctionnera pas.

[Invité]

Salut,

A priori, la fonction que tu appelles semble être dans une DLL (cf. ton commentaire).

Partant de là, je pense qu'il serait bon que tu vérifies les conventions d'appel de ton prototype de fonction (StdCall semble le plus approprié) car il existe des différences non négligeables entre langages (ex : C++) et les valeurs passées ou retournées peuvent en devenir complétement ésotériques.

A+

Didier

[RIVOLLET]

Il s'agissait à priori des directives d'appel de la dll. Elle était en stdcall et après renseignement, il semble que la dll soit écrite à partir de C. Aussi, j'ai mis cdecl et ca a l'air de fonctionner !


Merci beaucoup,

Rfab !