Rechercher - Liste des utilisateurs
Version complète : Remplacer un groupe de Cases
Accueil » FunDelphi » Remplacer un groupe de Cases
1
intello
Est-ce qu'il y a une commande fundelphi qui peut remplacer tout un groupe de cases ?

C'est à dire remplacer plusieurs cases en même temps .


sjrd
Pas telle quelle, non. Mais si tu précises exactement ce que tu veux faire, on peut écrire ce qu'on appelle une boucle, qui va pouvoir traiter plusieurs cases d'un coup.

Mais il faut savoir exactement ce que tu entends par "remplacer plusieurs cases en même temps".

Est-ce que c'est remplacer toutes les cases dont par exemple l'effet est TrucMachin en la même case mais avec l'effet Chose ?
Est-ce que c'est modifier toutes les cases dans une zone donnée (un rectangle) ?
Est-ce que c'est modifier une liste de cases qui n'ont pas de point commun permettant de les identifiant, autrement que par leurs coordonnées ?
intello
sjrd
Est-ce que c'est modifier une liste de cases qui n'ont pas de point commun permettant de les identifiant, autrement que par leurs coordonnées ?


Ce serait ça que je voudrais .

Mais si tu peux me donner aussi un code pour
sjrd
remplacer toutes les cases dont par exemple l'effet est TrucMachin en la même case mais avec l'effet Chose
, je ne dirais pas non.
sjrd
Alors pour le premier, ben il n'y a pas d'autre solution que de modifier chaque case une à une.

Pour le second, il suffit de faire ceci :
  on Execute do
  var
    I: Integer;
  begin
    for I := 0 to Map.LinearMapCount-1 do
      if Map.LinearMap[I].Effect = TrucMachin then
        Map.LinearMap[I].Effect := Chose;
  end;

Tu peux bien entendu adapter pour Field/Tool/Obstacle
This is a "lo-fi" version of our main content. To view the full version with more information, formatting and images, please click here.
Powered by DjangoBB