GetPasswordChar

Синтаксис

Function GetPasswordChar(ByVal gadget As Long) As UByte

Описание

Получает специальный одинаковый символ ввода для всех клавиш. Возвращаемое значение - код символа Ascii (все коды можно посмотреть ЗДЕСЬ )

Параметры

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

Платформы

Windows

Пример

#Include "window9.bi"
Dim As integer event
Var hwnd=OpenWindow("1",300,10,500,500)
EditorGadget(1,10,10,300,300, "")
SetPasswordChar(1,4)
? GetPasswordChar(1)
Do
  event=WaitEvent()
  If event=EventClose Then End
Loop

Результат

4

Created with the Personal Edition of HelpNDoc: Easy CHM and documentation editor