Уроки PureBasic

Categories

Categories

Other Sites



             Поиск по сайту

     

                


    Оставить мне сообщение:



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

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

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

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

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

указываем путь к папке с иконками.

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


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

Уроки PureBasic



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

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




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

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

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

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

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


- путь к иконке

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


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

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

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

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

Уроки PureBasic

 

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

;---------------------------Шаблон окна------------------------------------------- ; ;--------------------------------------------------------------------------------- #Window_0 = 0 #Hyp = 1 #But = 2 ;{------------------Окно-------------------------------- OpenWindow (#Window_0, 0, 0, 380, 200, "Заглавие", #PB_Window_MinimizeGadget | #PB_Window_ScreenCentered ) ;SetWindowColor(#Window_0,RGB(255, 255, 255)) HyperLinkGadget(#Hyp, 10,10, 80, 20, "ссылка",RGB(52, 25, 226)) ButtonGadget (#But, 10,30, 110, 25, "кнопка") ;}------------------------------------------------------ ;{----------------- Главный цикл ------------------------- 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 ; если много окон ;}------------------------------------------------------- </plaintext> </div><br><br> <img src="img/lin.jpg" width="700" height="20" alt="Уроки PureBasic"><br><br> </div> </div> <!-- copyright (t4) --><div align="center">Используются технологии <a href="http://www.ucoz.ru/" title="Создать сайт бесплатно"><b>uCoz</b></a><br /></div><!-- /copyright --> </body> </html>