Új hozzászólás Aktív témák

• #1304 alitak senior tag N!tRo #1303

  Új Válasz 2006-06-04 22:00:34 #1304

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  alitak

  senior tag

  válasz N!tRo #1303 üzenetére

  A problémás rész az volt bizony.
  Nagy segítség volt, hogy észrevetted a két helyen is előforduló exitet, azt jó eséllyel suliban is beleírtam, és elfeledtem.
  
  case jel of
  #80: begin
  o:=o+1; {fel}
  textbackground(white); gotoxy(2,y+oe); write(lehet[oe]); {elozo atfestese}
  textbackground(blue); gotoxy(2,y+o); write(lehet[o]); {uj atirasa}
  end;
  #72: begin
  o:=o-1; {le}
  textbackground(white); gotoxy(2,y+oe); write(lehet[oe]); {elozo atfestese}
  textbackground(blue); gotoxy(2,y+o); write(lehet[o]); {uj atirasa}
  end;
  Ezzel az a baj, hogy ha az o értéke kiesik a 0-3 intervallumból, akkor is kirajzolja, és csak utána korrigálja az o értékét.
  
  #13: case o of
  1..5: fej:=lehetfej[o];
  end;
  Ez világmegváltás volt, thx érte
  
  Lefutattam F7-ttel az egész szart, és arra jutottam, hogy mikor megnyomom az ESC-pet, akkor a jel-be bekerül a #27, és ott is marad, amíg ki nem lép a procedúrából. Utána már rejtélyesen az #0 értéket veszi fel. Ezért az egész menübe kilépést megoldottam egy boolean változóval. Ami legalább műxik. Viszont onnan meg nem működik rendesen a menu procedura, de az már a holnap munkája lesz.
  
  ui.: Sokat segítettél, köszi. És én is Attila vagyok
  
  mod: frissítettem a változatot, amit nemrég linkeltem.
  
  [Szerkesztve]

Új hozzászólás Aktív témák