SetComboBoxItemText

Синтаксис

Sub SetComboBoxItemText(ByVal gadget As Long, ByRef text As String, ByVal item As Long)

Описание

Устанавливает текст в указанном пункте ComboBoxGadget

Параметры

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

text - новый текст для пункта

item - индекс пункта, для которого надо поменять текст

Платформы

Windows , Linux

Пример

#Include "window9.bi"
#Ifdef __FB_WIN32__
Var h = 80
#Else
Var h = 30
#EndIf
OpenWindow("",10,10,300,100)
ComboBoxGadget(1,10,10,100,h)
AddComboBoxItem(1,"Привет0",-1)
AddComboBoxItem(1,"Привет1",-1)
AddComboBoxItem(1,"Привет2",-1)
ButtonGadget(2,150,10,100,25,"Заменить")
Do
  var event=WaitEvent()
  If event=eventclose Then End
  If event=eventgadget Then
     If eventnumber()=2 Then
        SetComboBoxItemText(1,"Новый текст",1)
     EndIf
  EndIf
Loop

Created with the Personal Edition of HelpNDoc: Create HTML Help, DOC, PDF and print manuals from 1 single source