Version imprimable
Salut ,
j'ai une version pascal pour Windows.
Mais les commandes textcolor, ... ne marchent pas .
Dans cette version, il n'y a pas d'unite crt, il y a wincrt.
J'ai essayé de mettre une unité crt avec les autres unités mais ça ne marche pas ?
Comment faire svp ?
Ben utilise wincrt :roll:
Je crois que t'es obligé de passer par les API de windows pour ça (cf l'aide de ton compilateur), mais c'est pas si simple que ça à utiliser (pour moi en tout cas).
Le mieux, c'est de prendre un autre compilateur, ça te permettra d'utiliser pleinement les tutoriaux et les cours de turbo pascal qui te tombent sous la main.
Mais dans wincrt , la commande textcolor
marche pas ?
WinCrt construit sa propre fenêtre terminale, avec un fond blanc et du texte noir si je ne m'abuse.
Seulement TPW n'a pas de fonction permettant de changer la couleur du texte car ce n'est pas une fenêtre console standard, vu que ça n'existait pas à l'époque de Windows 3.1.
L'idéal aurait été de changer directement la couleur du texte (avec SetTextColor) avant d'écrire sur la console, en récupérant auparavant le handle de fenêtre de la console. Mais manque de pot, en regardant le code source de WinCrt, il s'avère que juste avant d'écrire des données sur la console, la couleur de texte noire est rétablie ! C'est pas de chance...
Donc, la seule solution consiste à récupérer le handle de la fenêtre, à changer la couleur, et à écrire soi-même dans la fenêtre console. Ceci exclut donc toute utilisation de Write/WriteLn.
Bien sûr, pour que ce soit plus drôle, le handle de la fenêtre n'est pas déclaré publiquement, donc il faut le récupérer à la main, avec FindWindow par exemple.
@++ et bonne chance...
Ou GetFocus()Citation:
Envoyé par Hdd34
Je n'ai pas la solution à ton problème, usoft. Cependant je te conseille vivement d'utiliser Turbo Pascal 7 (éditeur en mode texte sous DOS) ou alors Delphi 1 (éditeur en mode graphique qui tourne sous Win 3.1)