* * *    
Главная » Статьи » Введение

Просмотров: 3680 | Дата: 20.01.2022 | Коментарии (0)

Настройка интерфейса


При компиляции проекта, exe файл имеет неприглядный вид:

Исправим этот момент.
В меню программы PureBasic:

Компилятор - настройки компилятора... - использовать иконку
указываем путь к папке с иконками.



После компиляции проекта, exe файл приобретёт вид выбранной иконки - например:



Для удобства работы с программой PureForm можно настроить ее запуск с панели интерфейса PureBasic.



Помещаем папку с программой PureForm в корень папки PureBasic.

В меню инструменты - настройка инструментов - новый - Редактор параметров инструментов.



В настройках Редактора параметров инструментов указываем путь к папке PureBasic и путь к exe файлу.
Далее в настройках PureBasic файл - настройки... - основные - панель инструментов указываем нужные настройки:

- путь к иконке
- Название нашего инструмента



На этой панели можно указать еще один инструмент - Шаблоны





Пример шаблона окна:


Code
UsePNGImageDecoder()  
UseJPEGImageDecoder()  
;-----------------------------------
Enumeration  
  #Window_0
  #Hyp  
  #But_1  
  #But_2  
EndEnumeration
;-----------------------------------
Procedure ProsWB()
; код
EndProcedure
;CatchImage(1, ?Im1, ?Im1End -?Im1 )
;-----------------------------------
OpenWindow (#Window_0, 0, 0, 380, 200, "Заглавие", #PB_Window_MinimizeGadget |#PB_Window_MaximizeGadget|#PB_Window_ScreenCentered|#PB_Window_SizeGadget)  
;SetWindowColor(#Window_0,RGB(255, 255, 255))
HyperLinkGadget(#Hyp, 45, 10, 80, 20, "ссылка",RGB(52, 25, 226))
ButtonGadget(#But_1,10, 30, 110, 25, "кнопка")
;ButtonImageGadget(#But_2,10, 60, 110, 25,ImageID(1))
;-----------------------------------
Repeat
Event = WaitWindowEvent()  
Window = EventWindow()  
Gadget = EventGadget()
  Select Event
  Case #PB_Event_Gadget
  Select EventGadget()
     Case 1
     Case 2
     Case 3
  EndSelect
  EndSelect
If Event = #PB_Event_CloseWindow
Break ;CloseWindow(Window) ; если много окон
EndIf
ForEver ;Until Event=#PB_Event_CloseWindow And Window=#Window_0 ; если много окон
;-----------------------------------
DataSection
  Im1:
  ;IncludeBinary "изображение.png"
  Im1End:
EndDataSection













Сайт посвящён языку программирования PureBasic — коммерческий компилятор языка программирования, использующего синтаксис BASIC. Предназначен для создания кроссплатформенных приложений для AmigaOS, Linux, Microsoft Windows, Windows NT и Mac OS X. Разработан компанией Fantaisie Software.