Discussion :

[kikica]

Bonjour!
J'ai téléchargé le composant gratuit "chessbrd1" sur http://www.resplendence.com/chessbrd
Maintenant je souhaite faire ceci: lorsque je fais drag-drop du pion sur la case par ex. e3, que le message m'averti: showmessage (' pion e3');
Si je joue la Dame sur e3 showmessage (' Dame e3');
Merci beaucoup pour toute aide!

[Tchaill39]

Salut.

Tu as 2 solutions, soit tu modifie le source du composant afin d'implémenter l'évenement "OnDragDrop" .

Soit dans ton code tu surcharge cet événement. Mais tu ne pourra le faire de l'extérieur que si il est déclaré public dans le composant ....

Voilà. Bon courage

[kikica]

Merci pour ta réponse, mais je ne suis pas très fort en code, donc... ce que tu dis pour moi c'est du chinois...
Tu peux pas poster le côde...?

[Tchaill39]

Ben difficilement puisque je n'ai pas ton composant !!!!!

Regarde dans ta fenetre d'inspecteur d'objet lié à ton composant , dans les événements, ceux qui sont dispo et donne les moi.

[kikica]

Ben difficilement puisque je n'ai pas ton composant !!!!!

Regarde dans ta fenetre d'inspecteur d'objet lié à ton composant , dans les événements, ceux qui sont dispo et donne les moi.

Le composant est téléchargeable gratuitement à la page http://www.resplendence.com/chessbrd

[Tchaill39]

le plus simple :

Tu cherche le morceau de code suivant :

case piece of
'p': begin
Result:=CheckLegalPawnMove(oldsq,newsq);
end;
'n': begin
Result:=CheckLegalKnightMove(oldsq,newsq);
end;
'b': begin
Result:=CheckLegalBishopMove(oldsq,newsq);
end;
'r': begin
Result:=CheckLegalRookMove(oldsq,newsq);
end;
'q': begin
Result:=CheckLegalQueenMove(oldsq,newsq);
end;
'k': begin
Result:=CheckLegalKingMove(oldsq,newsq);
end;

Ce morceau de code est dans la fct "MoveIsLegal" Tu ajoute apres chaque Result, si le mouvement est légal, un message car à ce moment là tu connais le mouvement, la pièce concernée et si le mouvement est légal voilà.

Tu ajoutes un message avec "Showmessage" ou une autre fct si tu as mieux

Voilà. Si tu as des questions .......