NewsForumsCodeLogsGallerySpecsSearch

BlitzUI and ListBox

Community Forums/Showcase/BlitzUI and ListBox

Filax(Posted 2003) [#1]
How i can know what item is selected, i have read the doc ! but ....



Graphics 640, 480, 16, 2
SetBuffer BackBuffer( )
HidePointer

Include "blitzui.bb"

;Load fonts and mouse cursors
;and collect information
Initialise( )

;Window
win001 = Window( 131, 104, 362, 242, "Configuration graphique", "0", 1, 0, 1, 1 )
btn001 = Button( 6, 188, 113, 21, "Appliquer", "0", 1, 0, 0 )
btn002 = Button( 236, 188, 113, 21, "Annuler", "0", 1, 0, 0 )
chk001 = CheckBox( 15, 35, "Plein ecran", 0 )
chk001_copy_copy = CheckBox( 15, 14, "Mode fenetre", 0 )
chk001_copy = CheckBox( 15, 61, "Activation du WBuffer (ATI)", 0 )
chk001_copy_copy = CheckBox( 15, 82, "Activation de l'antialiasing", 0 )
lst001 = ListBox( 184, 11, 165, 170, 20, 20, 10, 0 )
AddListBoxItem( lst001, 0, "640/480 en 16 Bits", "" )
AddListBoxItem( lst001, 0, "640/480 en 32 bits", "" )
AddListBoxItem( lst001, 0, "800/600 en 16 Bits", "" )
AddListBoxItem( lst001, 0, "800/600 en 32 Bits", "" )
AddListBoxItem( lst001, 0, "1024/768 en 16 Bits", "" )
AddListBoxItem( lst001, 0, "1024/768 en 32 Bits", "" )
AddListBoxItem( lst001, 0, "1600/1200 en 16 Bits", "" )
AddListBoxItem( lst001, 0, "1600/1200 en 32 Bits", "" )


Repeat

;Draw the GUI and update the mouse
UpdateGUI( )

;Event Handling
Select app\Event
Case EVENT_WINDOW
Select app\WindowEvent
End Select
Case EVENT_MENU
Select app\MenuEvent
End Select
Case EVENT_GADGET
Select app\GadgetEvent
Case btn002
Exit
Case lst001

End Select
End Select

;Draw the mouse
DrawMouse( )

;Reset all GUI events
ResetEvents( )

Flip
Cls

Until KeyHit( 1 ) Or app\Quit = True
;Free all images and controls created by BlitzUI
Destroy( )
End


Filax(Posted 2003) [#2]
I have find ... sorry !

Case lst001
SelItem$ = SendMessage( lst001, "LM_GETCAPTION" )

If SelItem$="640/480 en 16 Bits" Then
Exit
EndIf


Odds On(Posted 2003) [#3]
A slightly quicker method would be this:


Case lst001
If app\GadgetEventData="640/480 en 16 Bits" Then
Exit
EndIf


Filax(Posted 2003) [#4]
Ok ! Thx :)

Great job this lib ! but the doc have not all function
detailled ? no ?

XLNT Killer :)

Do you have plan for use é,à,ê char ???


Odds On(Posted 2003) [#5]
I think most of the functions are documented.. there may be a couple of recently added functions that aren't documented yet though..

I haven't planned to add accented characters etc, but then again I never really thought of adding them, so I probably will :P


Yappy(Posted 2003) [#6]
xlnt killer eh ? - i would probly agree ;)

xlnt ii tho....hmmmm :P


Beaker(Posted 2003) [#7]
Fullernator - have you considered support for FONText fonts?


Odds On(Posted 2003) [#8]
MasterBeaker, I considered it but I don't think it's suitable for BlitzUI since all the drawing code is 2d... if you have any suggestions on how to implement it I would love to add it to BlitzUI though :)

Yappy, from your worklogs I thought xlnt ii would be out a while ago :P.. I have to agree, visually, xlnt ii will certainly beat BlitzUI, but it should be interesting to see how fast a GUI system based on images runs :)


Beaker(Posted 2003) [#9]
Fullernator - I'm on holiday for a bit starting today, but, I'll look into making some helpful functions for you (and Yappy) when I get back.