Function ResetEnum() As Integer
Функция сбрасывает счетчик перечислений функции EnumSettingsDisplay. Может понадобится при повторных перечислениях.
нет
Windows
#Include "window9.bi"
Dim As String Setting
Do
   Setting=EnumSettingsDisplay()
   If Setting<>"" Then
      ? Setting
   Else
      Exit Do
   EndIf
Loop
ResetEnum
Sleep
print
Do
   Setting=EnumSettingsDisplay()
   If Setting<>"" Then
      ? Setting
   Else
      Exit Do
   EndIf
Loop
Sleep

Created with the Personal Edition of HelpNDoc: Write EPub books for the iPad