Hogy tudnám ezt megvalósítani? (Turbo Pascal)
Figyelt kérdés
Úgy kellene kiírassak a képernyőre egy betűt (vagy számot, jelet, azt amit), hogy az előtte lévő karakter eltűnjön (olyan színe legyen mint a háttérnek). Eddig megvan az, hogy tudjam kiíratni minden másodikat más színnel, csak azt nem tudom, hogy az előtte lévőből hogy csináljak más színűt.2013. márc. 31. 23:35
2/6 anonim 
válasza:
válasza:Próbálj meg backspace karaktert kiíratni, vagy gotoxy-nal visszamenni. Ha az első működik az egyszerűbb. Egyébként mi szükség a for ciklusra es a repeat untilra is?
3/6 A kérdező kommentje:
es azt a backspacet hogy írassam ki ??
2013. ápr. 1. 00:15
4/6 anonim válasza:
válasza:write(#8) ha minden igaz, de 10 éve nem pascaloztam, szóval lehet tévedek.
5/6 anonim válasza:
válasza:ja és persze utána írass ki egy szóközt is, hogy eltűnjön a kiírt betű
6/6 ejbenjaro válasza:
válasza:Próbáld így:
program animacio;
uses crt;
Type
TPoint = record
x: byte;
y: byte;
end;
var
AktualisKoordinata, ElozoKoordinata : Tpoint;
i: integer;
begin
AktualisKoordinata.X:=1;
AktualisKoordinata.Y:=1;
ElozoKoordinata:=AktualisKoordinata;
Clrscr;
for i:=1 to 15 do
begin
TextColor(4);
GotoXY(AktualisKoordinata.X,AktualisKoordinata.Y);
Write('X');
ElozoKoordinata:=AktualisKoordinata;
AktualisKoordinata.X:=AktualisKoordinata.X+1;
delay(250);
TextColor(0);
GotoXY(ElozoKoordinata.X,ElozoKoordinata.Y);
Write(' ');
end;
Readln;
end.
Kapcsolódó kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!