SetIpAddress

Синтаксис

Sub SetIpAddress(ByVal gadget As Long, byref IP_ADDRESS As string)

Описание

Функция устанавливает строку с ip адресом в IpAddressGadget

Параметры

gadget - номер гаджета

IP_ADDRESS - строка ip адреса

Платформы

Windows

Пример

#Include "window9.bi"
Dim As integer event
OpenWindow("1",300,10,190,150)
IpAddressGadget(1,10,50,150,20)
SetIpAddress(1,"255.10.1.1")
Do
  event=WaitEvent()
  If event=EventClose Then End
Loop

Результат

Created with the Personal Edition of HelpNDoc: Easy EBook and documentation generator