Re: idea for comboimage

Hmm, still doesn't help. I fiddled around with it and found that this
works a treat:

Option Explicit
Private Sub Form_Load()
Dim ii As Integer

ImageCombo1.ComboItems.Clear
For ii = 1 To 10
ImageCombo1.ComboItems.Add ii, "key" & ii, ii & "pippo", 1
Next
End Sub

Private Sub ImageCombo1_KeyPress(KeyAscii As Integer)
Dim bInCombo As Boolean
Dim ii As Integer
Dim lLen As Long
Dim szKeyAsciiPress As String

If KeyAscii <> vbKeyReturn Then
szKeyAsciiPress = LCase(Chr(KeyAscii))
lLen = Len(szKeyAsciiPress)
bInCombo = False
For ii = 1 To ImageCombo1.ComboItems.Count
If LCase(Left(ImageCombo1.ComboItems(ii).Text, lLen)) =
szKeyAsciiPress Then
bInCombo = True
ImageCombo1.ComboItems(ii).Selected = True
Exit For
End If
Next
End If
End Sub

What would be really nice though, is if the combobox were unlocked, it
did a sort of auto-complete type thing. There are some places where the
box is unlocked to allow the user to type in stuff themselves.

Regards, Dave.

-----Original Message-----
From: frank_lupo [mailto:frank_lupo(at)email(dot)it]
Sent: 22 August 2002 09:29
To: Dave Page
Cc: pgadmin-hackers
Subject: RE: [pgadmin-hackers] idea for comboimage

if you modify result timer "Timer - vTimer > 0.6" is not necessary press
a key twice

Hi Frank,
That just about fixes it, but I still find that sometimes (can't see a
pattern) I have to press a key twice to get the right value.
Regards, Dave

Bye !! Frank Lupo (Wolf) !!
----
Prendi GRATIS l'email universale che... risparmia: clicca qui

Sponsor:
Con questo elettrostimolatore in soli 10 minuti potete esercitare circa
600 volte i vostri addominali. Vieni a Scoprire Ab Gymnic!
Clicca qui