Помощь - Поиск - Пользователи - Календарь
Полная версия: Курсор в графике
Форум «Всё о Паскале» > Pascal, Object Pascal > Теоретические вопросы
DEXTER
Вот например у меня написано
.......
OutTextXY(100,100,'Ответ');
--------------
я начинаю писать ответ, а у меня курсор возвращается в точку (0,0)! А мне надо чтобы он был правее слова "Ответ" на экране!

GoToXY - не катит! При компиляции он почему-то не работает, т.е. курсор находится в (0,0).
Подскажите пожалуста!
volvo
MoveTo + F1

P.S. А вообще-то можешь поискать по форуму, по-моему где-то выкладывалась функция ввода строки в графическом режиме в заданной позиции ...
Ozzя
Тебе нужно использовать readkey
while key<>13 do // пока не нажали enter
begin
key:=readkey; // прочитать код клавиши
/// преобразовать его в символ
OutText(); // вывести на экран
end;
DEXTER
MoveTo(x,y) - прермешает указатель координат в точку окна с координатами (x,y). Точка на экране не высвечивается.
А что такое F1 ?
volvo
А ты не просил высветить точку... Ты спрашивал про изменение координат указателя, или твой первый пост говорит о другом?

А F1 - это справка Турбо Паскаля...

Тебе, кстати, Оззя уже написал что надо делать: после ввода очередного символа с клавиатуры выводить его через OuttextXY там, где это нужно тебе...
DEXTER
Вот это сейчас у меня в программе так:
Код

repeat
     OutTextXY(130,438,'Ответ:');
      GotoXY (24,28);
     ReadLn(ch);
    Until ch in ['1'..'4'];


А мне нужно чтобы не было GoToXY, но символ там показывался!


DEXTER
Цитата(Ozzя @ 1.06.2007 10:23) *

Тебе нужно использовать readkey
while key<>13 do // пока не нажали enter
begin
key:=readkey; // прочитать код клавиши
/// преобразовать его в символ
OutText(); // вывести на экран
end;


мне кажется с ReadKey никак не получится, потому-что мне нужен ch, он у меня ответ выбирает!
вот косяк то......!!!! mega_chok.gif
Ozzя

while ch> #13 do
begin
ch:=readkey;
OutText(ch);
end;
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.