Load_icon

Синтаксис

Function Load_Icon(ByRef sFileName As String) As Any ptr

Описание

Позволяет загружать иконки и далее использовать хендл иконки для вывода на различные устройства. В Linux данная функция эквивалентна Load_image, то есть в Linux можно загружать любой поддерживаемый формат.

Параметры

sFileName - путь к файлу иконки.

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As HWND hWnd
Dim Shared As HMENU menu
hwnd = OpenWindow("",10,10,300,300)
menu = CreatePopMenu()
MenuItem(1001,menu,"Свернуть окно")
MenuItem(1002, menu,"Развернуть окно")
AddSysTrayIcon(1,hwnd,load_Icon("1.ico"),"иконка")
Do
  Var   ev=WaitEvent
  If ev=EventClose Then
     Deletesystrayicon(1)
     End
  EndIf
Loop

Результат

Created with the Personal Edition of HelpNDoc: Full featured EBook editor