Тема: HELP
Показать сообщение отдельно
Старый 07.03.2011, 02:05   #4
Пётр
Нуждающийся
 
Регистрация: 23.05.2007
Сообщений: 95
Написано 34 полезных сообщений
(для 53 пользователей)
Ответ: HELP

Вот справка, переведенная на русский http://pure-basic.narod.ru/PureBasic.chm

Сообщение от }{@KeR Посмотреть сообщение
Как надо написать чтобы выводило на экран сообщение как в блитце какая клавиша нажата...
Это что-ль надо?
OpenWindow(0,0,0,230,150,"", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) 
EditorGadget(0,10,10,210,130 )
Repeat
  Event=WaitWindowEvent()
  If Event=#WM_KEYDOWN                            ; Была нажата кнопка
    AddGadgetItem(0,-1,Str( EventwParam())+"  " ) ; Помещаем её код в редактор
    SendMessage_(GadgetID(0),#EM_SETSEL,-1,-1)    ; Прокрутка текста
  EndIf
Until Event=#PB_Event_CloseWindow
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
}{@KeR (10.03.2011)