Показать сообщение отдельно
Старый 03.02.2010, 00:16   #14
odd
Мастер
 
Аватар для odd
 
Регистрация: 06.09.2007
Адрес: Донецк, ДНР
Сообщений: 1,023
Написано 298 полезных сообщений
(для 713 пользователей)
Ответ: Перевод кода Pascal abc в код MidletPascal

Сообщение от VotapilD Посмотреть сообщение
Вместо делея-

..............
   showform;
   repaint;
   while KeyToAction(GetKeyClicked)<>GA_FIRE do delay(10);
   d:=b*b-4*a*c;   //дискрэменант
   showcanvas;
 begin
......
Кто тебя так учил опрашивать клавиатуру в режиме форм? Там для этого есть только команды (COMMAND).
(Offline)
 
Ответить с цитированием