Forum FunLabyrinthe

Lorsque je met

field TDecoB16 (TWall)
  name 'Pierre praticable';
  image 'Fields/ImpraticalStone';
  category SCategoryDecoB;
end;

Il me met dans l'inspecteur d'objets /painter qu'il superpose ImpraticalStone avec Wall

Oui c'est ce qui est prévu. Les images spécifiées dans image sont ajoutées aux images déjà mises par la classe de base (TWall).

À la fois c'est prévu, et à la fois je sais que ce n'est pas toujours ce qu'on veut. J'avais déjà réfléchi à un moyen de "choisir" ce qu'on veut au cas par cas, mais je ne m'étais pas arrêté sur une solution optimale.

Le "paliatif" que je te propose est de faire ceci :

field TDecoB16 (TWall)
  name 'Pierre praticable';
  category SCategoryDecoB;

  on AfterConstruction do
  begin
    Painter.Clear;
    Painter.AddImage('Fields/ImpraticalStone');

    inherited;
  end;
end;

J'avoue c'est pas cool. Je vais reporter ma réflexion sur ce problème pour la version 5.2 définitive.

Merci , et peut - on changer le Painter d'un composant directement dans les "components" ?
Si oui , je n'ai pas réussi à trouver comment .

Euh non ce n'est pas possible. Mais c'est une bonne suggestion. Je vais ajouter ça à ma to-do list.