Ładny brzuch

Czy kto pamita jak mona wyczyci okienko aplikacji konsolowej
w Delphi? Chodzi mi o to co w Turbo Pascalu realizowao si przez
clrscr.

Pietrek_C


w przypadku aplikacji konsolowej trzeba sobie samemu napisac [chyba]:program Project1; {$APPTYPE CONSOLE} uses  SysUtils, Windows; procedure clrscr; var  str : String;  I : Integer;  handle : DWORD;  coord : _COORD; begin  handle := GetStdHandle( STD_OUTPUT_HANDLE );  coord.X := 0; coord.Y := 0;  SetConsoleCursorPosition( handle, coord);  str := StringOfChar( ' ', 2000 );  Writeln( str );  SetConsoleCursorPosition( handle, coord); end; begin   writeln('elo');   readln;   clrscr;   writeln('hyhyhyhy');   readln; end.

pozdrawiam
pepsi^no1

Bardzo dziekuje! :) Co prawda nie _coord a TCoord, ale to juz
drobiazg. Dosc, ze sie udao! Choc myslalem, ze to mozna prosciej...

Pietrek_C

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •