Listbox: bovenste item selecteren?

listboxIk probeerde het bovenste element van de listbox te selecteren bij het openen van het scherm en het vullen van de lijst, met:
lsbxInvoice.Current.Selected = ..
maar dat werkte niet zo …

Een listbox is een lijst met n elementen; bv 15 elementen.
De elementen worden genummerd en kunnen aangesproken worden met een index.
Het eerste element in de lijst heeft index nummer 0, dus het laatste n-1.
Vb element[0] .. element[14].

Een listbox wordt gevuld door de methode “Add”, eventueel aangevuld met de plaats waar de toevoeging moet gebeuren.
bv
lsbxInvoice.Add("001-aankoop")
lsbxInvoice.Add("001-aankoop", 0)

Na het vullen van de listbox kan het bovenste element geselecteerd worden door de index te zetten:

lsbxInvoice.Index = 0

Op deze manier kan bij het openen van het scherm een element van de lijst geselecteerd worden.

Volgorde tabs wijzigen in tabstrip?

TabStrip
Veronderstel dat je een tabstrip in elkaar stak zoals op de afbeelding. Maar nu is er een probleem; je wil dat gebruikers terechtkomen in de “algemene” tabstrip General. Helaas staat die achteraan, en de eerste wordt geopend.

  • Klik de “properties” kant van het scherm open (rechts) als dat nog niet gebeurd is. Klik bovenaan op Hierarchy. Daar zie je de onderdelen apart staan. Helaas zijn ze niet te selecteren om de volgorde te veranderen…
  • Ook klikken en slepen in de GUI gaat niet.

Oplossing gevonden:

Muiscursor boven het tabblad, rechtsklik; kies “Move tab”: “first” / “previous” / “next” / “last”, …Move First

Selectie uit een rolluiklijst (combobox)

ComboBox Events … Een rolluiklijst of dropdownlist heet in Gambas “combobox”.ComboBox
Het is namelijk een combinatie van 2 verschillende schermobjecten:

op de knop drukken laat het rolluik met mogelijkheden neer; het opent de lijst.

Helaas zijn hier nogal veel mogelijkheden ingebouwd, en is het niet altijd zo snel duidelijk wat ze wanneer doen.

ComboBox Events …Wat een combobox doet is bv afhankelijk van de “events” (klik rechts, “events”, zie afbeelding )

ReadOnly: TRUE
ComboBox Read Only
op “pijltje” openen: ok
_Activate: nvt
cmbx1.Popup() doet niets
_MouseDown() –
_Change: nvt
_LostFocus: –
_Click() ook bij “enter”
meeste akties hier
  ReadOnly: FALSE
ComboBox 1
op “pijltje” openen: ok
_Activate: opgeroepen bij “enter” vlgs DEBUG
cmbx1.Popup() Automatisch openen lijst – niet?
_MouseDown() : cmbx1.Popup() om ipv tekst met cursor lijst te krijgen
_Change: als de tekst wijzigt …
_LostFocus: controleer of waarde …
_Click()

Dus cmbx_change wordt niet geaktiveerd door het veranderen van de selectie in de combobox (bv scrollen van de waarden).
cmbx_change wordt alleen geaktiveerd in een “writeable” cmbx, waarin je op de plek van de selectie de tekst verandert. Ook als je een keuze maakt uit de waarden van de rolluiklijst wordt dat als een verandering van die tekst beschouwd en wordt _change uitgevoerd. (waardoor het lijkt op de reaktie van _click bij een readonly combobox)

Project source download en run

Ontwikkeling in Gambas op verschillende computers, en het project heen en weer kopieren:

  • – overbodige Form files verwijderen
  • – opletten met “deel compilatie” *

* (ik weet niet waardoor het veroorzaakt wordt)

Eerste computer:
Project dat uit verschillende forms, modules en classes bestaat. Make source package. Upload source.tar.gz.

Andere computer:
download source.tar.gz
uitpakken.
Run: niet alle vensters lijken helemaal mee te zijn met de development versie van Eerste.
Compile all

Opgelost met: Project, Compile All.
Uit menu of dubbele groene pijl (ze schermafbeelding)

(Gekozen tussen “Compile all”, Project, “refresh” en Tools, “update all forms”)

Shell script draaien vanuit Gambas

Uit de mailing list begreep ik dat het mogelijk is een shell script te laten draaien vanuit Gambas:
( het voorbeeld gaat uit van een script in de project map)

DIM sTempScript as String
'
sTempScript = Temp$
'
COPY "update.sh" TO sTempscript
'
SHELL sTempScript WAIT

Als het project in een andere subfolder staat is het :

COPY "subfolder/update.sh" TO sTempscript

Voorbeeld van mysql gebruik in Gambas

Deze blog post geeft een volledig uitgewerkt voorbeeld, met code, data-beschrijving, en scherm:
How to program Gambas with MySQL in Ubuntu

De installatie is gericht op Ubuntu, maar het voorbeeld is natuurlijk voor alle Gambas gebruikers geldig.

Er wordt teruggegrepen naar een bestaande artikel van 2003 (Gambas versie 1), hier als zip-file die een pdf bevat:
http://www.ilmukomputer.com/wp-content/uploads/2007/02/tamrin-gambasdanmysql.zip

en er wordt verwezen naar een inleiding hier (Maleisische site, ook Ubuntu gericht):
Gambas : Visual Basic untuk linux dan tutorial penggunaanya

Installatiepakket maken van je Gambas programma

Menu Project / Make / Installation package
of het icoon van de doos, hier helemaal rechts: Install package
ps: Ik kreeg eerst een foutmelding omdat een directory niet (meer) bestond waarin (?) tijdelijke bestanden geschreven worden.

Dan start een procedure in 7 stappen:
(hier ingevuld met vb waarden)

  • 1. Package information name, e-mail maintainer, vendor, Description, Licence …
  • 2. Changes : “initial release”
  • 3. Target distribution: openSuse
  • 4. Package group Productivity/Office/Finance
  • 5. Menu entry: Office/Finance Categories: Finance; Office
  • 6. Destination directory: upload/mijnproject/distribution
  • 7. Ok ; the packages have been successfully created.

Het resultaat zijn in dit geval twee bestanden:

mijnproject-0.0.80-1suse.src.rpm
mijnproject-0.0.80-1suse.noarch.rpm

  • 1. Informatie over het programma en contactpersoon
  • 2. Normaal de wijzigingen tov de vorige versie
  • 3. Alleen de distributies waarvoor je paketten kan maken zijn als keuze beschikbaar.
  • 4. Package group Productivity/Office/Finance
  • 5. Waar in de menu struktuur het programma komt
  • 6. Waar het resultaat moet gezet worden (lokaal – niet installatie)
  • 7. Ze komen in de in 6. opgegeven bestemmingsdirectory.

3.: om bv een Ubuntu pakket te maken op openSuse moet je “debhelper” installeren; in openSuse 10.3 zit dat in de “deb” package.