Ładny brzuch
Mam problem. Ot potzrbne mi jest, jak w Pascalu stworzy menu, ktre steruje si kursorami lewo, prawo, gra d.
Z gry dzikuj za szybk odpowied.
Najlepszym sposobem bedzie zrobienie samemu ;) Sprobuj napisac samodzielnie, a jakbys mial jakis problem to mozesz o niego konkretnie pytac. A jesli ci sie nie chce robic samemu to sobie poguglaj, powienienes znalezc mnostwo kodow tego typu... :P
wanie w tym problem, e nie mog nigdzie znale. Wiem, e to ju mj drugi problem dzi, ale rozumiesz... to jest duuuuo waniejsze ni tamto!!
chodzi tylko o to, co wpisa, aby "czyta" kursory, sam procedur menu znam.
z moich starych "programow" wyciagnelem takie cos
var KL:char; repeat KL:=readkey; IF KL=#75 then (Cos tam) IF KL=#72 then (Cos tam) IF KL=#77 then (Cos tam) IF KL=#80 then (Cos tam) until KL=#27;{Wyj˜cie ESC}
Uytkownik DrizeR edytowa ten post 25 padziernik 2005, 21:36
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Z gry dzikuj za szybk odpowied.
Najlepszym sposobem bedzie zrobienie samemu ;) Sprobuj napisac samodzielnie, a jakbys mial jakis problem to mozesz o niego konkretnie pytac. A jesli ci sie nie chce robic samemu to sobie poguglaj, powienienes znalezc mnostwo kodow tego typu... :P
wanie w tym problem, e nie mog nigdzie znale. Wiem, e to ju mj drugi problem dzi, ale rozumiesz... to jest duuuuo waniejsze ni tamto!!
chodzi tylko o to, co wpisa, aby "czyta" kursory, sam procedur menu znam.
z moich starych "programow" wyciagnelem takie cos
var KL:char; repeat KL:=readkey; IF KL=#75 then (Cos tam) IF KL=#72 then (Cos tam) IF KL=#77 then (Cos tam) IF KL=#80 then (Cos tam) until KL=#27;{Wyj˜cie ESC}
Uytkownik DrizeR edytowa ten post 25 padziernik 2005, 21:36