Инструкция
1
Установите PureBasic на компьютер и запустите программу, открыв редактор IDE. Для русификации программы скачайте русификатор и загрузите его в программу, проверив раздел настроек, отвечающий за язык.
2
3
После этого в меню выберите раздел «Компилятор» и нажмите «Скомпилировать». Вы увидите окно с кнопкой текста, вызванное командой MessageRequester. Чтобы узнать подробности о каждой функции, наведите на нее курсор и нажмите F1.
4
5
Для создания оконного приложения введите в редактор следующий код:
OpenWindow(1,200,250,200,50,"Окно",#PB_Window_MinimizeGadget)
CreateGadgetList(WindowID(1))
TextGadget(2,70,16,180,15,"Строка текста")
Repeat
Event=WaitWindowEvent()
Until Event=#PB_Event_CloseWindow
End
OpenWindow(1,200,250,200,50,"Окно",#PB_Window_MinimizeGadget)
CreateGadgetList(WindowID(1))
TextGadget(2,70,16,180,15,"Строка текста")
Repeat
Event=WaitWindowEvent()
Until Event=#PB_Event_CloseWindow
End
6
Вы увидите открывшееся простое окно приложения. Первая функция кода OpenWindow создала непосредственно само окно, а числа обозначают его идентификатор и положение относительно всех краев экрана. Четвертое число — ширина окна, пятое — высота окна. В кавычках вы видите текст, который отображается внутри окна. Команда Event_CloseWindow и End завершит работу программы.
7
Для того, чтобы создать программу с экранной кнопкой, которую можно нажать, введите следующий код:
OpenWindow(1,0,0,200,90,"Заголовок окна",#PB_Window_MinimizeGadget|#PB_Window_ScreenCentered)
CreateGadgetList( WindowID(1) )
ButtonGadget(2,64,30,80,25,"Кнопка")
Repeat
Event=WaitWindowEvent()
Gadget=EventGadget()
If Event=#PB_Event_Gadget And Gadget=2 \
MessageRequester("Сообщение","Была нажата кнопка")
EndIf
Until Event = #PB_Event_CloseWindow
End
OpenWindow(1,0,0,200,90,"Заголовок окна",#PB_Window_MinimizeGadget|#PB_Window_ScreenCentered)
CreateGadgetList( WindowID(1) )
ButtonGadget(2,64,30,80,25,"Кнопка")
Repeat
Event=WaitWindowEvent()
Gadget=EventGadget()
If Event=#PB_Event_Gadget And Gadget=2 \
MessageRequester("Сообщение","Была нажата кнопка")
EndIf
Until Event = #PB_Event_CloseWindow
End
8
Команды здесь означают то же, что и в вышеописанном коде. If и And — команды, которые делают возможным нажатие кнопки. EventGadget — команда, возвращающая идентификатор гаджета произошедшего события, и функция If проверяет наличие события.
9
Также вы можете создать программу, которая способна создавать файлы. Для этого введите код в редактор:
If CreateFile(1, "C:\Test.txt")
WriteString(1,"Строка текста")
CloseFile(1)
EndIf
If CreateFile(1, "C:\Test.txt")
WriteString(1,"Строка текста")
CloseFile(1)
EndIf