ClearScreen sous un prog console

ClearScreen sous un prog console - Delphi/Pascal - Programmation

Marsh Posté le 07-09-2003 à 15:28:19    

Salut, comment faire un clearscreen dans une appli console créée avec Delphi 7 ?
Je sais que sous turbopascal y'a cls, mais ça marche po sous Delphi et tout mes profs de BTS me disent qu'ils connaissent pas, alors, ça existe ?

Reply

Marsh Posté le 07-09-2003 à 15:28:19   

Reply

Marsh Posté le 07-09-2003 à 16:14:34    

Après une petite recherche sur Google (parce que je voulais trouver comment on faisait :D), j'ai trouvé quelques infos pour bidouiller un truc :

Code :
  1. program Project1;
  3. {$APPTYPE CONSOLE}
  5. uses
  6.   SysUtils, Windows;
  8. var
  9.   s: string;
  10.   sbi: TConsoleScreenBufferInfo;
  11.   coord: TCoord;
  12.   i : integer;
  13. begin
  14.   writeln('blabla');
  15.   writeln('blabla');
  16.   writeln('blabla');
  17.   writeln('blabla');
  18.   readln(s);
  19.   GetConsoleScreenBufferInfo(GetStdHandle(STD_OUTPUT_HANDLE), sbi);
  20.   for i := 0 to sbi.dwSize.y do
  21.     writeln;
  22.   coord.X := 0;
  23.   coord.Y := 0;
  24.   SetConsoleCursorPosition(GetStdHandle(STD_OUTPUT_HANDLE), coord);
  25.   readln(s);
  26. end.


Il semblerait qu'il n'y ait pas de moyen plus simple que d'écrire des lignes vides puis de bouger le curseur.


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 08-09-2003 à 02:02:23    

Donc c confirmé, pas de clearscreen sous delphi ?
 
merde, c assez contraignant comme méthode ce que tu me dis, bien qu'il n'y en ai pas de meilleure. ça va me faire un exe assez gros pour un petit prog en mode console. je me suis déja amusé avec des caractères ascii pur faire un tableau tout autour de ma fenêtre (ur faire plus beau ;)v et mon exe fait tout de même dans les 80ko juste aec ce tableau).
 
ok, merci qd même

Reply

Marsh Posté le 08-09-2003 à 02:28:39    

sindromx a écrit :

Donc c confirmé, pas de clearscreen sous delphi ?
 
merde, c assez contraignant comme méthode ce que tu me dis, bien qu'il n'y en ai pas de meilleure. ça va me faire un exe assez gros pour un petit prog en mode console. je me suis déja amusé avec des caractères ascii pur faire un tableau tout autour de ma fenêtre (ur faire plus beau ;)v et mon exe fait tout de même dans les 80ko juste aec ce tableau).
 
ok, merci qd même


oh sa vas, sous devc++ mais appli de merde font 500 ko puis 300 ko apres etre passer sous UPX :/
 
alors t es en bts now ?? =)

Reply

Marsh Posté le 08-09-2003 à 11:14:07    

sindromx a écrit :

ça va me faire un exe assez gros  


 
:heink: c'est juste 4 lignes de code en plus, tu mets ça dans une fonction et c'est bon. Ça m'étonnerait que ce soient ces lignes qui rendent ton exe gros...


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 08-09-2003 à 11:32:15    

y a les séquences d'échapements ANSI style \j[33 enfin c'est pas ça mais y en a une pour effacer l'écran j'avais lu ça dans un bouquin, par contre uniquement sur terminaux/console ANSI évidements...

Reply

Marsh Posté le 08-09-2003 à 13:22:58    

Non, G T pas en train de dire que ce serait les lignes d'effacement qui rendraient mon exe plus gros mais mon interface qui faisait un tableau tout autour de mon menu avec des carac ASCII (#187;#188;#186;#201;#205;etc...) pour entouré tout l'ecran. C ça qui le rend gros.
Je me suis résolu à fare autrement
Bon, @+


Message édité par SinDromX le 08-09-2003 à 13:23:50
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed