Bonjour à tous

Quand je compile ceci (qui vient d'une unité Delphi, mais bon) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
type
  THPpile = class
  private
         Mem: extended;
         LastX: extended;
         pile: array[0..3] of extended;
         Mode: integer;
 ...
  public
        function x: string;
        function y: string;
        function z: string;
        function t: string;
        function m: string;
        procedure SetX(x: extended);
        procedure push(x: extended);
...
        procedure divide;
        procedure pow;
        procedure chgsgn;
        procedure Settings (m,d:integer);
        procedure invert;
        function YEnCours:extended;
  end;
j'ai un message d'erreur : duplicate identifier x (sur la ligne procedure SetX, ainsi que sur toutes celles qui sont sur le même modèle).
J'ai la même erreur pour m, aussi !
La portée des variables n'est-elle pourtant pas la même qu'en Pascal ?

D'autre part, j'ai cru (hum !) remarquer que dès que le nombre d'objets dans une fenêtre dépassait la quinzaine, on ne pouvait plus en ajouter :
  • soit je l'ajoute graphiquement, mais il n'apparaît pas dans le code, donc je ne peux pas le renommer, lui attribuer une méthode...
  • soit je l'ajoute à la main dans le code, mais il n'apparaît pas graphiquement
  • soit j'essaye les deux à la fois & il me déclare qu'un objet du même nom existe déjà.
Je précise que j'ai essayé ça plusieurs fois (sur des projets différents).
Y a-t-il un remède à ceci, ou est-ce un bug de Lazarus ?

Merci d'avance de vos réponses.