[Gambas-user] Using DataSource et al

[John K]

Hi Richard,
At long last I've managed to figure out how DataSource works. Thanks for 
suggesting another method. I'll keep it in mind for when I get more 
adventurous.
Regards,
John K.
richard terry wrote:
> On Tue, 22 Jul 2008 07:53:16 am John K wrote:
>   
>> Hi,
>> I'm new to Gambas so maybe I'm trying to run before I can walk. I'm in
>> the process of writing an application which uses sqlite as its database.
>> I've managed to create the database  and add data to its tables but now
>> I want to read out the data using datasource, datacontrol & databrowser.
>> I've scanned the Forum without any luck and have bought "A Beginners
>> Guide to Gambas" but this doesn't cover this subject in any detail.
>> Does anyone know where I can find a simple example, (maybe using Name,
>> Registration Number & Date of Birth) which demonstrates the use of these
>> tools or can help me in any other way?
>> Thanks ........
>>     
>
> You can also not use the data controls and do the whole thing manually, which 
> I do. (last env was python, so I got used to doing it)
>
> Maybe Benoit can criticise this if wrong, but what I do is:
>
> Set up a global connection variable as I have dozens of forms accessing the 
> database. Do the connection to the database (like in the data example in 
> gambas Pass the queries to the database
>
> This example is called from a textbox on a form which wants to get a list of 
> person's occupations, so I pass the textbox and a listview to the routine. 
> The occupations are pulled from postgres and populate the listview. You'll 
> wonder why I make the listview's tag a textbox - its because my forms have 
> dozens of textboxes, all using the listview, when the user selects from a 
> popped up list, I use the tag to set other information.
>
> I think the data controls built into gambas would do all this for  you, but 
> manually:
>
> Public Function occupation_get(tb As textbox, lv As listview)
>   
>    '-----------------------------------------------------------------
>    'Retrieves a list of occupations from common.lu_occupations, load
>    'them into a listbox whose key is pk_occupation
>    'returns loaded listbox
>    '-----------------------------------------------------------------
>    sql = " SELECT * from common.lu_occupations WHERE occupation ILIKE '"
>    sql = sql & Trim(tb.text) & "%' LIMIT 20"
>    $Result = modDBConnect.exec_query(sql)
>    lv.clear
>    If $Result.count Then
>       lv.tag = tb
>       For Each $Result
>              lv.Add($Result!pk, $Result!occupation)
>       Next
>       lv.Raise
>       lv.Visible = True
>    Else
>       lv.Visible = False
>    End If   
> End 
>
> Not sure if this helps, is confusing, but let me know
>
>
> Richard
>   
>> -------------------------------------------------------------------------
>> This SF.Net email is sponsored by the Moblin Your Move Developer's
>> challenge Build the coolest Linux based applications with Moblin SDK & win
>> great prizes Grand prize is a trip for two to an Open Source event anywhere
>> in the world http://moblin-contest.org/redirect.php?banner_id=100&url=/
>> _______________________________________________
>> Gambas-user mailing list
>> Gambas-user at lists.sourceforge.net
>> https://lists.sourceforge.net/lists/listinfo/gambas-user
>>     
>
>
>
> -------------------------------------------------------------------------
> This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
> Build the coolest Linux based applications with Moblin SDK & win great prizes
> Grand prize is a trip for two to an Open Source event anywhere in the world
> http://moblin-contest.org/redirect.php?banner_id=100&url=/
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>
> ______________________________________________________________________
> This mail has been virus scanned and spam scanned by Australia On Line
> see http://www.australiaonline.net.au/spamscanning
>
> Report this email as spam...
> http://reportspam.australiaonline.net.au/servlet/mail/john36/1216683372.24130_0.mailscanner2.ozonline.com.au/reportspam
>
>