Discussion :

[Roland Chastain]

Bonjour !

J'ai un programme de jeu d'échecs qui, suivant le mode de compilation, est, ou une application graphique, ou une application console destinée à être appelée par une application graphique spécialisée (Winboard).

Or lorsque le programme (sous sa forme console) est lancé par l'application extérieure, tout se passe bien, apparemment. Mais si je le lance moi-même tout simplement en double-cliquant dessus, la fenêtre graphique apparaît (en plus de la console) avec une cascade de message d'erreurs (violation d'accès, écriture à l'adresse 0).

Je voudrais régler ce problème, c'est-à-dire que la fenêtre graphique ne s'ouvre pas. Mais je crois qu'il faut qu'elle soit quand même créée en mémoire pour que le programme fonctionne. Quelle stratégie adopter ?

Je précise que je ne suis pas l'auteur de ce programme. Je le découvre depuis deux jours. L'auteur l'ayant abandonné, j'ai l'intention de le reprendre.

Voici le lien vers le code source du projet dans son état actuel.

https://drive.google.com/open?id=1Mj...uAVJ1f-NT5wqri

Si vous avez des suggestions même sur des points qui ne se rapportent pas à ma question, je suis preneur.

[Paul TOTH]

je suppose que lorsqu'elle est lancé par l'autre application, il lui demande de ne pas s'afficher (ShellExecute avec SW_HIDE) car en regardant rapidement, la "console" est gérée dans un thread secondaire donc rien n'empêche la partie VCL de se lancer

[Roland Chastain]

Merci Paul. Oui, c'est ce que j'ai imaginé aussi. Mais j'aimerais bien quand même régler ce problème, de sorte que l'application ne se plante pas même quand on la lance manuellement. C'est-à-dire que la fenêtre n'apparaisse pas, mais que l'application s'exécute quand même, sans que j'aie besoin de remanier tout le code. Est-ce que c'est possible ?

[Roland Chastain]

J'ai appliqué la solution indiquée dans cette discussion.

Code :

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

1
2
3
4
5
6
procedure TForm1.FormCreate;
begin
  ...
{$IFDEF XBOARD}
  Application.ShowMainForm := false;
  Visible := false;

Ça paraît fonctionner.

[Roland Chastain]

Au cas où cela intéresse quelqu'un, voici l'adresse du dépôt GitLab pour ce projet. Nous préparons, Pawel et moi, la publication de la prochaine version. Les contributions sont bienvenues.

https://gitlab.com/rchastain/hopeless

C'est un moteur de jeu d'échecs (WinBoard), de force moyenne, avec une interface graphique rudimentaire intégrée.

[Roland Chastain]

Ce qui serait encore mieux, ce serait de refaire l'interface graphique en FMX (avec l'échiquier fabriqué dans cette discussion).