IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

> Игра, Буквы
Mick
сообщение 9.01.2007 21:04
Сообщение #1


Гость






Братцы помогите написать прогу Угадай букву есле кто может помогите
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
мисс_граффити
сообщение 11.01.2007 1:06
Сообщение #2


просто человек
******

Группа: Модераторы
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

Репутация: -  55  +


blink.gif
ни фига не поняла.
Var
Code:Integer;
Begin
Edit1.Text:=sim; //Выводим в Edit1 sim. Что это такое - неизвестно. Глобальная переменная? Проблема с ее заданием?
Edit1.Clear; //Сразу очищаем. А зачем выводили? Пользователь ничего не успеет заметить
Edit1.SetFocus;//Помещаем курсор в Edit
Code:=ord(sim);//Запоминаем код sim. А зачем? Мы его всегда сможем получить...
n:=n+1;

if code>B then Label2.Caption:='Введите букву выше от

введеной'+#13
+'вами по алфавиту' else
if code<B then Label2.Caption:='Введите букву ниже

от введеной'+#13
+'вами по алфавиту'
else

Коды строчных латинских букв: 97 - a, 122 - z


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 8.07.2025 13:35
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"