Версия для печати темы
Нажмите сюда для просмотра этой темы в обычном формате
Форум «Всё о Паскале» _ Теоретические вопросы _ Курсор в графике
Автор: DEXTER 1.06.2007 13:09
Вот например у меня написано
.......
OutTextXY(100,100,'Ответ');
--------------
я начинаю писать ответ, а у меня курсор возвращается в точку (0,0)! А мне надо чтобы он был правее слова "Ответ" на экране!
GoToXY - не катит! При компиляции он почему-то не работает, т.е. курсор находится в (0,0).
Подскажите пожалуста!
Автор: volvo 1.06.2007 13:18
MoveTo + F1
P.S. А вообще-то можешь поискать по форуму, по-моему где-то выкладывалась функция ввода строки в графическом режиме в заданной позиции ...
Автор: Ozzя 1.06.2007 13:23
Тебе нужно использовать readkey
while key<>13 do // пока не нажали enter
begin
key:=readkey; // прочитать код клавиши
/// преобразовать его в символ
OutText(); // вывести на экран
end;
Автор: DEXTER 1.06.2007 13:43
MoveTo(x,y) - прермешает указатель координат в точку окна с координатами (x,y). Точка на экране не высвечивается.
А что такое F1 ?
Автор: volvo 1.06.2007 13:47
А ты не просил высветить точку... Ты спрашивал про изменение координат указателя, или твой первый пост говорит о другом?
А F1 - это справка Турбо Паскаля...
Тебе, кстати, Оззя уже написал что надо делать: после ввода очередного символа с клавиатуры выводить его через OuttextXY там, где это нужно тебе...
Автор: DEXTER 1.06.2007 14:24
Вот это сейчас у меня в программе так:
repeat
OutTextXY(130,438,'Ответ:');
GotoXY (24,28);
ReadLn(ch);
Until ch in ['1'..'4'];
А мне нужно чтобы не было GoToXY, но символ там показывался!
Автор: DEXTER 1.06.2007 16:31
Тебе нужно использовать readkey
while key<>13 do // пока не нажали enter
begin
key:=readkey; // прочитать код клавиши
/// преобразовать его в символ
OutText(); // вывести на экран
end;
мне кажется с ReadKey никак не получится, потому-что мне нужен ch, он у меня ответ выбирает!
вот косяк то......!!!!
Автор: Ozzя 1.06.2007 16:44
while ch> #13 do
begin
ch:=readkey;
OutText(ch);
end;