DECLARE SUB ListBox1Click (Sender AS QLISTBOX) DECLARE SUB ListBox1DblClick (Sender AS QLISTBOX)
CREATE Form AS QFORM Caption = "Form1" Width = 320 Height = 240 Center CREATE ListBox1 AS QLISTBOX Left = 146 Top = 7 ItemIndex=2 Height = 153 OnClick = ListBox1Click OnDblClick = ListBox1DblClick END CREATE END CREATE
ListBox1.AddItems="item1","item2","item3","item4"
Form.ShowModal
SUB ListBox1Click (Sender AS QLISTBOX) print ListBox1.itemindex END SUB
SUB ListBox1DblClick (Sender AS QLISTBOX) END SUB
I dont see the first item... item1.... What am I doing wrong?
Thanx for any info..
/A
2. Re: qform Problems
#559
Posted by: 2002-10-15 18:03:46
There's a small error in the AddItems command. It should be: