[Gambas-user] gambas exe use in android phone

[Unaise EK]

how can i work gambas exe file in android flatform (android mobile phones)

-- 
M. Unaise. E.K
9895687604
Librarian,
(BLISc, MLIS)
JDT Islam Polytechnic College,
Vellimadukunnu.



 Sent with Mailtrack

--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Re: [Gambas-user] search over the gridview and not to the database and refill grid its possible?

[Unaise EK]

Is there any substitute for flexgrid in VB for gambas.

On 18 Jun 2017 11:26 a.m., "PICCORO McKAY Lenz" 
wrote:

> as subject said: search over the gridview event to the database and refill
> grid its possible?
>
> i have a gridview object filled with data from the db, note: column names
> are autodetected.
>
> its there any way to search over gridview data and filter the results in
> gridview or there-s some object with that behaviour?
>
> Lenz McKAY Gerardo (PICCORO)
> http://qgqlochekone.blogspot.com
> 
> --
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> ___
> Gambas-user mailing list
> Gambas-user@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>
--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Re: [Gambas-user] gambas 3 and mysql

[Unaise EK]

Problem solved

Public Sub Save_button_Click()
try MODMain.MyConn.Exec( "INSERT INTO name_tbl (adm, name, place, date_ad)
VALUES (&1,&2,&3,&4)",textbox1.text,textbox2,text,textbox4.text,
datebox1.value)
if not error then
message("Data saved")
endif

On 14 Jun 2017 4:01 p.m., "Tobias Boege" <tabo...@gmail.com> wrote:

On Wed, 14 Jun 2017, Unaise EK wrote:
> hai,
> i worte these code for storing data into mysql database, all data stored
> into database except date_ad.
>
>
> Public Sub Save_button_Click()
> Dim InsertDb As String
> 'Dim Dx As Date
> 'Format(Dx, "dd/mm/")
> InsertDb = "INSERT INTO name_tbl (adm, name, place, date_ad) VALUES ('" &
> (TextBox1.Text) & "','" & (TextBox2.Text) & "', '" & (TextBox3.Text) & "',
> '" & DateBox1.Value & "' )"
> MODMain.MyConn.Exec(InsertDb)
> message("Data saved")
> clear1
>
>
> pls help

I think the error comes from the fact that you take DateBox1.Value and
concatenate it to a string. This triggers an implicit converion of the
Date value into a string -- but the way Gambas does this conversion is
not compatible with how MySQL excepts dates to be formatted:

  $ gbx3 -e '"|" & Now() & "|"'
  |06/14/2017 14:16:29.291|

Above is how Gambas serialises a date when concatenating it with a string
(apparently it is independent of the locale, at least), but the MySQL
documentation [1] tells you that the date separator should not be a "/"
slash, as in Gambas, but a "-" hyphen (there may be other incompatibilities,
but one is enough already for the insert to fail).

How to fix this? Writing your own "INSERT INTO" statement is already a
bad idea. Gambas' database drivers can write those statements correctly
for you already. They also prevent SQL injection attacks, such as the one
that is blatantly present in your code. Something like this would be
preferable:

  Dim hInsert As Result

  hInsert = MODMain.MyConn.Create("name_tbl")
  With hInsert
!adm = TextBox1.Text
!name= TextBox2.Text
!place   = TextBox3.Text
!date_ad = DateBox1.Value
  End With
  hInsert.Update()

If you haven't seen this before, look up the corresponding documentation
[2][3], or ask more specific questions.

Regards,
Tobi

[1] https://dev.mysql.com/doc/refman/5.5/en/date-and-time-literals.html
[2] http://gambaswiki.org/wiki/comp/gb.db/connection/create
[3] http://gambaswiki.org/wiki/comp/gb.db/result/update

--
"There's an old saying: Don't change anything... ever!" -- Mr. Monk


--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

[Gambas-user] gambas 3 and mysql

[Unaise EK]

hai,
i worte these code for storing data into mysql database, all data stored
into database except date_ad.


Public Sub Save_button_Click()
Dim InsertDb As String
'Dim Dx As Date
'Format(Dx, "dd/mm/")
InsertDb = "INSERT INTO name_tbl (adm, name, place, date_ad) VALUES ('" &
(TextBox1.Text) & "','" & (TextBox2.Text) & "', '" & (TextBox3.Text) & "',
'" & DateBox1.Value & "' )"
MODMain.MyConn.Exec(InsertDb)
message("Data saved")
clear1


pls help
-- 
M. Unaise. E.K
9895687604
Librarian,
(BLISc, MLIS)
JDT Islam Polytechnic College,
Vellimadukunnu.
--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Re: [Gambas-user] Change the code and copy in other project

[Unaise EK]

Sir,
when i type "Select * from NameTbl where Adm = '" & textbox1.tex &"';"
this query not working, then i changed it to
"Select Name, Adm, Place from NameTbl where Adm ='"& textbox1.tex &"';"
this query is working.

so how can i write * from query in gambas 3
pls help



   Sent with Mailtrack


On Fri, May 26, 2017 at 1:19 PM, Gianluigi  wrote:

> I forgot to say that I know a way to extract the source code from a
> compiled Gambas file, it can be seen here[0].
>
> Regards
> Gianluigi
>
> [0]http://www.gambas-it.org/smf/index.php?topic=4448.msg38882#msg38882
>
> 2017-05-25 23:58 GMT+02:00 Gianluigi :
>
> > Ciao Charlie,
> >
> > Thanks, the problem is not with/in IDE, but if working with a
> > project.gambas
> > Problem that I can bypass by copying useful files first to a folder,
> since
> > I have no more src in the compiled project.
> >
> > Regards
> > Gianluigi
> >
> > 2017-05-25 23:24 GMT+02:00 Karl Reinl :
> >
> >> Am Donnerstag, den 25.05.2017, 20:06 +0200 schrieb Gianluigi:
> >> > I need to copy modules and classes from my project, change the code
> >> > partially and copy it to another project.
> >> > Is this only possible from IDE or is it possible also from a compiled
> >> > project?
> >> > Is there still the src folder in the compiled project?
> >> >
> >> > Regards
> >> > Gianluigi
> >>
> >> Salut Gianluigi,
> >>
> >> you can 'import' the modules,classes etc. from other projects on your
> >> disc into your new project, using the IDE Import.
> >> Or you look into the hidden '.src' folder and copy the files you need.
> >> --
> >> Amicalement
> >> Charlie
> >>
> >>
> >> 
> >> --
> >> Check out the vibrant tech community on one of the world's most
> >> engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> >> ___
> >> Gambas-user mailing list
> >> Gambas-user@lists.sourceforge.net
> >> https://lists.sourceforge.net/lists/listinfo/gambas-user
> >>
> >
> >
> 
> --
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> ___
> Gambas-user mailing list
> Gambas-user@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>



-- 
M. Unaise. E.K
9895687604
Librarian,
(BLISc, MLIS)
JDT Islam Polytechnic College,
Vellimadukunnu.
--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Re: [Gambas-user] How to enumerate through SQL Result (was Re: Gambas-user Digest, Vol 132, Issue 29)

[Unaise EK]

Sir
My problem solved
Public Procedure AddList()
  Dim ListQurey As String
  Dim Lresult As Result

  ListQurey = "SELECT name FROM name_tbl"
  Lresult = MODMain.MyConn.Exec(ListQurey)
  'If Lresult.Count > 0 Then
  '*  Do While Not Eof(Lresult)*
  while Lresult.available
  ListBox1.Add(Lresult!"name")
  Lresult.MoveNext
  wend
  'Endif

On 25 May 2017 9:06 p.m., "T Lee Davidson" <t.lee.david...@gmail.com> wrote:

> On 05/25/2017 05:24 AM, Unaise EK wrote:
> > this is my code for displaying data in listbox, but it did not working,
> pls
> > help
> >
> > Public Procedure AddList()
> >Dim ListQurey As String
> >Dim Lresult As Result
> >
> >ListQurey = "SELECT name FROM name_tbl"
> >Lresult = MODMain.MyConn.Exec(ListQurey)
> >If Lresult.Count > 0 Then
> >*  Do While Not Eof(Lresult)*
> >ListBox1.Add(Lresult!"name")
> >Lresult.MoveNext
> >  Loop
> >Endif
> >
> > End
>
> I don't know why you are trying to use Eof() on a SQL Result. Eof is for a
> Stream.
>
> See:
> http://gambaswiki.org/wiki/comp/gb.db/result
>
> "This class is enumerable with the FOR EACH keyword."
>
> And, I believe 'ListBox1.Add(Lresult!"name")' should be
> 'ListBox1.Add(Lresult!name)' or 'ListBox1.Add(Lresult["name"])'.
>
>
> Also, please try to compose meaningful subject lines by creating a _new_
> message instead of simply replying to a message that is
> not related to your issue. That helps those who view list messages in
> threaded mode. TIA.
>
> --
> Lee
>
> 
> --
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> ___
> Gambas-user mailing list
> Gambas-user@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>
--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Re: [Gambas-user] when i used collections on my code, gambas get hangs!

[Unaise EK]

Sir one more help,

Public Sub Save_button_Click()
Dim InsertDb As String
'Dim Dx As Date
'Format(Dx, "dd/mm/")
InsertDb = "INSERT INTO name_tbl (adm, name, place, date_ad) VALUES ('" &
(TextBox1.Text) & "','" & (TextBox2.Text) & "', '" & (TextBox3.Text) & "',
'" & DateBox1.Value & "' )"
MODMain.MyConn.Exec(InsertDb)
message("Data saved")
clear1
'Form2.Show

End



  <https://mailtrack.io/> Sent with Mailtrack
<https://mailtrack.io/install?source=signature=en=unais...@gmail.com=22>

On Thu, May 25, 2017 at 3:26 PM, Unaise EK <unais...@gmail.com> wrote:

> Thanks, it is working
>
> On 25 May 2017 3:11 p.m., "Jorge Carrión" <sho...@gmail.com> wrote:
>
>> Try
>>
>> Public Procedure AddList()
>>   Dim ListQurey As String
>>   Dim Lresult As Result
>>
>>   ListQurey = "SELECT name FROM name_tbl"
>>   Lresult = MODMain.MyConn.Exec(ListQurey)
>>   'If Lresult.Count > 0 Then
>>   '*  Do While Not Eof(Lresult)*
>>   while Lresult.available
>>   ListBox1.Add(Lresult!"name")
>>   Lresult.MoveNext
>>   wend
>>   'Endif
>>
>> End
>>
>> 2017-05-25 11:29 GMT+02:00 Unaise EK <unais...@gmail.com>:
>>
>> > this is my code for displaying data in listbox, but it did not working,
>> pls
>> > help
>> >
>> > Public Procedure AddList()
>> >   Dim ListQurey As String
>> >   Dim Lresult As Result
>> >
>> >   ListQurey = "SELECT name FROM name_tbl"
>> >   Lresult = MODMain.MyConn.Exec(ListQurey)
>> >   If Lresult.Count > 0 Then
>> >   *  Do While Not Eof(Lresult)*
>> >   ListBox1.Add(Lresult!"name")
>> >   Lresult.MoveNext
>> > Loop
>> >   Endif
>> >
>> > End
>> >
>> >
>> >
>> >   <https://mailtrack.io/> Sent with Mailtrack
>> > <https://mailtrack.io/install?source=signature=en;
>> > referral=unais...@gmail.com=22>
>> >
>> > On Thu, May 25, 2017 at 2:52 PM, Unaise EK <unais...@gmail.com> wrote:
>> >
>> > > can you give example for
>> > > DO WHILE NOT database EOF
>> > >
>> > > Loop
>> > >
>> > >
>> > >
>> > >
>> > >   <https://mailtrack.io/> Sent with Mailtrack
>> > > <https://mailtrack.io/install?source=signature=en;
>> > referral=unais...@gmail.com=22>
>> > >
>> > > On Thu, May 25, 2017 at 8:30 AM, PICCORO McKAY Lenz <
>> > > mckaygerh...@gmail.com> wrote:
>> > >
>> > >> there are the piece of code and here there's no secret:
>> > >>
>> > >> Public Function getItems() As Collection
>> > >>
>> > >>   Dim $items As New Collection
>> > >>   Dim itema, itemb as String = "something"
>> > >>
>> > >>   $items.Add($itema, "item1")
>> > >>   $items.Add($itemb, "item2")
>> > >>   $items.Add(2, "cuantos")
>> > >>
>> > >>   Return $items
>> > >>
>> > >> End
>> > >>
>> > >> here the previous code "bad programed" and when i swicht to
>> collection
>> > >> gambas ide get slower after some time, the code was:
>> > >>
>> > >> Public Function getItems() As String[]
>> > >>
>> > >>   Dim $items As New String[]
>> > >>   Dim itema, itemb as String = "something"
>> > >>
>> > >>   $items.Add($itema)
>> > >>   $items.Add($itemb)
>> > >>
>> > >>   Return $items
>> > >>
>> > >> End
>> > >>
>> > >> the gambas ide and the OS was not shutdown during 40 days, also the
>> > gambas
>> > >> ide was not quit in this period, and in that period i run the huge
>> data
>> > >> code of the 3 odbc bug with 10 registers, after change the code
>> to
>> > >> collection  (each change are little before test) thje ide gambas get
>> > slow
>> > >> and does not run well..
>> > >>
>> > >> this happened to my other partners in the job... i test also in
>> debian
>> > >> jeesie and happened same!
>> > >>
>>

Re: [Gambas-user] when i used collections on my code, gambas get hangs!

[Unaise EK]

Sir one more help,

Public Sub Save_button_Click()
Dim InsertDb As String
'Dim Dx As Date
'Format(Dx, "dd/mm/")
InsertDb = "INSERT INTO name_tbl (adm, name, place, date_ad) VALUES ('" &
(TextBox1.Text) & "','" & (TextBox2.Text) & "', '" & (TextBox3.Text) & "',
'" & DateBox1.Value & "' )"
MODMain.MyConn.Exec(InsertDb)
message("Data saved")
clear1
'Form2.Show

date value not seen in database. it shows blank


End

On Thu, May 25, 2017 at 3:26 PM, Unaise EK <unais...@gmail.com> wrote:

> Thanks, it is working
>
> On 25 May 2017 3:11 p.m., "Jorge Carrión" <sho...@gmail.com> wrote:
>
>> Try
>>
>> Public Procedure AddList()
>>   Dim ListQurey As String
>>   Dim Lresult As Result
>>
>>   ListQurey = "SELECT name FROM name_tbl"
>>   Lresult = MODMain.MyConn.Exec(ListQurey)
>>   'If Lresult.Count > 0 Then
>>   '*  Do While Not Eof(Lresult)*
>>   while Lresult.available
>>   ListBox1.Add(Lresult!"name")
>>   Lresult.MoveNext
>>   wend
>>   'Endif
>>
>> End
>>
>> 2017-05-25 11:29 GMT+02:00 Unaise EK <unais...@gmail.com>:
>>
>> > this is my code for displaying data in listbox, but it did not working,
>> pls
>> > help
>> >
>> > Public Procedure AddList()
>> >   Dim ListQurey As String
>> >   Dim Lresult As Result
>> >
>> >   ListQurey = "SELECT name FROM name_tbl"
>> >   Lresult = MODMain.MyConn.Exec(ListQurey)
>> >   If Lresult.Count > 0 Then
>> >   *  Do While Not Eof(Lresult)*
>> >   ListBox1.Add(Lresult!"name")
>> >   Lresult.MoveNext
>> > Loop
>> >   Endif
>> >
>> > End
>> >
>> >
>> >
>> >   <https://mailtrack.io/> Sent with Mailtrack
>> > <https://mailtrack.io/install?source=signature=en;
>> > referral=unais...@gmail.com=22>
>> >
>> > On Thu, May 25, 2017 at 2:52 PM, Unaise EK <unais...@gmail.com> wrote:
>> >
>> > > can you give example for
>> > > DO WHILE NOT database EOF
>> > >
>> > > Loop
>> > >
>> > >
>> > >
>> > >
>> > >   <https://mailtrack.io/> Sent with Mailtrack
>> > > <https://mailtrack.io/install?source=signature=en;
>> > referral=unais...@gmail.com=22>
>> > >
>> > > On Thu, May 25, 2017 at 8:30 AM, PICCORO McKAY Lenz <
>> > > mckaygerh...@gmail.com> wrote:
>> > >
>> > >> there are the piece of code and here there's no secret:
>> > >>
>> > >> Public Function getItems() As Collection
>> > >>
>> > >>   Dim $items As New Collection
>> > >>   Dim itema, itemb as String = "something"
>> > >>
>> > >>   $items.Add($itema, "item1")
>> > >>   $items.Add($itemb, "item2")
>> > >>   $items.Add(2, "cuantos")
>> > >>
>> > >>   Return $items
>> > >>
>> > >> End
>> > >>
>> > >> here the previous code "bad programed" and when i swicht to
>> collection
>> > >> gambas ide get slower after some time, the code was:
>> > >>
>> > >> Public Function getItems() As String[]
>> > >>
>> > >>   Dim $items As New String[]
>> > >>   Dim itema, itemb as String = "something"
>> > >>
>> > >>   $items.Add($itema)
>> > >>   $items.Add($itemb)
>> > >>
>> > >>   Return $items
>> > >>
>> > >> End
>> > >>
>> > >> the gambas ide and the OS was not shutdown during 40 days, also the
>> > gambas
>> > >> ide was not quit in this period, and in that period i run the huge
>> data
>> > >> code of the 3 odbc bug with 10 registers, after change the code
>> to
>> > >> collection  (each change are little before test) thje ide gambas get
>> > slow
>> > >> and does not run well..
>> > >>
>> > >> this happened to my other partners in the job... i test also in
>> debian
>> > >> jeesie and happened same!
>> > >>
>> > >> i noted that when alone user said something its like "nothigs its

Re: [Gambas-user] when i used collections on my code, gambas get hangs!

[Unaise EK]

Thanks, it is working

On 25 May 2017 3:11 p.m., "Jorge Carrión" <sho...@gmail.com> wrote:

> Try
>
> Public Procedure AddList()
>   Dim ListQurey As String
>   Dim Lresult As Result
>
>   ListQurey = "SELECT name FROM name_tbl"
>   Lresult = MODMain.MyConn.Exec(ListQurey)
>   'If Lresult.Count > 0 Then
>   '*  Do While Not Eof(Lresult)*
>   while Lresult.available
>   ListBox1.Add(Lresult!"name")
>   Lresult.MoveNext
>   wend
>   'Endif
>
> End
>
> 2017-05-25 11:29 GMT+02:00 Unaise EK <unais...@gmail.com>:
>
> > this is my code for displaying data in listbox, but it did not working,
> pls
> > help
> >
> > Public Procedure AddList()
> >   Dim ListQurey As String
> >   Dim Lresult As Result
> >
> >   ListQurey = "SELECT name FROM name_tbl"
> >   Lresult = MODMain.MyConn.Exec(ListQurey)
> >   If Lresult.Count > 0 Then
> >   *  Do While Not Eof(Lresult)*
> >   ListBox1.Add(Lresult!"name")
> >   Lresult.MoveNext
> > Loop
> >   Endif
> >
> > End
> >
> >
> >
> >   <https://mailtrack.io/> Sent with Mailtrack
> > <https://mailtrack.io/install?source=signature=en;
> > referral=unais...@gmail.com=22>
> >
> > On Thu, May 25, 2017 at 2:52 PM, Unaise EK <unais...@gmail.com> wrote:
> >
> > > can you give example for
> > > DO WHILE NOT database EOF
> > >
> > > Loop
> > >
> > >
> > >
> > >
> > >   <https://mailtrack.io/> Sent with Mailtrack
> > > <https://mailtrack.io/install?source=signature=en;
> > referral=unais...@gmail.com=22>
> > >
> > > On Thu, May 25, 2017 at 8:30 AM, PICCORO McKAY Lenz <
> > > mckaygerh...@gmail.com> wrote:
> > >
> > >> there are the piece of code and here there's no secret:
> > >>
> > >> Public Function getItems() As Collection
> > >>
> > >>   Dim $items As New Collection
> > >>   Dim itema, itemb as String = "something"
> > >>
> > >>   $items.Add($itema, "item1")
> > >>   $items.Add($itemb, "item2")
> > >>   $items.Add(2, "cuantos")
> > >>
> > >>   Return $items
> > >>
> > >> End
> > >>
> > >> here the previous code "bad programed" and when i swicht to collection
> > >> gambas ide get slower after some time, the code was:
> > >>
> > >> Public Function getItems() As String[]
> > >>
> > >>   Dim $items As New String[]
> > >>   Dim itema, itemb as String = "something"
> > >>
> > >>   $items.Add($itema)
> > >>   $items.Add($itemb)
> > >>
> > >>   Return $items
> > >>
> > >> End
> > >>
> > >> the gambas ide and the OS was not shutdown during 40 days, also the
> > gambas
> > >> ide was not quit in this period, and in that period i run the huge
> data
> > >> code of the 3 odbc bug with 10 registers, after change the code to
> > >> collection  (each change are little before test) thje ide gambas get
> > slow
> > >> and does not run well..
> > >>
> > >> this happened to my other partners in the job... i test also in debian
> > >> jeesie and happened same!
> > >>
> > >> i noted that when alone user said something its like "nothigs its
> > >> happened,
> > >> its just bad programer"
> > >>
> > >> will need other to reports, but these other do not have time to make a
> > >> little project and report that..
> > >>
> > >> sqlite was severi broken until gambas 3.6 and must be rewrite for
> gambas
> > >> 3.8
> > >>
> > >> now in gamba 3.9 ther's some doc-online problems with cache and some
> > >> memory
> > >> manage problems..
> > >>
> > >> but for not specialized programmers its very difficult to debug, find
> > and
> > >> report LIKE THE QT problem..
> > >>
> > >>
> > >>
> > >> Lenz McKAY Gerardo (PICCORO)
> > >> http://qgqlochekone.blogspot.com
> > >>
> > >> 2017-05-24 17:01 GMT-04:30 Jussi Lahtinen <jussi.lahti...@gmail.com>:
> > >>
> > >> > Impossible to say anything wit

Re: [Gambas-user] when i used collections on my code, gambas get hangs!

[Unaise EK]

this is my code for displaying data in listbox, but it did not working, pls
help

Public Procedure AddList()
  Dim ListQurey As String
  Dim Lresult As Result

  ListQurey = "SELECT name FROM name_tbl"
  Lresult = MODMain.MyConn.Exec(ListQurey)
  If Lresult.Count > 0 Then
  *  Do While Not Eof(Lresult)*
  ListBox1.Add(Lresult!"name")
  Lresult.MoveNext
Loop
  Endif

End



  <https://mailtrack.io/> Sent with Mailtrack
<https://mailtrack.io/install?source=signature=en=unais...@gmail.com=22>

On Thu, May 25, 2017 at 2:52 PM, Unaise EK <unais...@gmail.com> wrote:

> can you give example for
> DO WHILE NOT database EOF
>
> Loop
>
>
>
>
>   <https://mailtrack.io/> Sent with Mailtrack
> <https://mailtrack.io/install?source=signature=en=unais...@gmail.com=22>
>
> On Thu, May 25, 2017 at 8:30 AM, PICCORO McKAY Lenz <
> mckaygerh...@gmail.com> wrote:
>
>> there are the piece of code and here there's no secret:
>>
>> Public Function getItems() As Collection
>>
>>   Dim $items As New Collection
>>   Dim itema, itemb as String = "something"
>>
>>   $items.Add($itema, "item1")
>>   $items.Add($itemb, "item2")
>>   $items.Add(2, "cuantos")
>>
>>   Return $items
>>
>> End
>>
>> here the previous code "bad programed" and when i swicht to collection
>> gambas ide get slower after some time, the code was:
>>
>> Public Function getItems() As String[]
>>
>>   Dim $items As New String[]
>>   Dim itema, itemb as String = "something"
>>
>>   $items.Add($itema)
>>   $items.Add($itemb)
>>
>>   Return $items
>>
>> End
>>
>> the gambas ide and the OS was not shutdown during 40 days, also the gambas
>> ide was not quit in this period, and in that period i run the huge data
>> code of the 3 odbc bug with 10 registers, after change the code to
>> collection  (each change are little before test) thje ide gambas get slow
>> and does not run well..
>>
>> this happened to my other partners in the job... i test also in debian
>> jeesie and happened same!
>>
>> i noted that when alone user said something its like "nothigs its
>> happened,
>> its just bad programer"
>>
>> will need other to reports, but these other do not have time to make a
>> little project and report that..
>>
>> sqlite was severi broken until gambas 3.6 and must be rewrite for gambas
>> 3.8
>>
>> now in gamba 3.9 ther's some doc-online problems with cache and some
>> memory
>> manage problems..
>>
>> but for not specialized programmers its very difficult to debug, find and
>> report LIKE THE QT problem..
>>
>>
>>
>> Lenz McKAY Gerardo (PICCORO)
>> http://qgqlochekone.blogspot.com
>>
>> 2017-05-24 17:01 GMT-04:30 Jussi Lahtinen <jussi.lahti...@gmail.com>:
>>
>> > Impossible to say anything without seeing the code, which causes the
>> > problem.
>> >
>> >
>> > Jussi
>> >
>> > On Thu, May 25, 2017 at 12:11 AM, PICCORO McKAY Lenz <
>> > mckaygerh...@gmail.com
>> > > wrote:
>> >
>> > > i change the odbc code for huge data to transport only two objects
>> with a
>> > > string, and i noted that gambas before hangs sometimes... so i
>> discovered
>> > > that when i used collections the memory management are very bad..
>> > >
>> > > should i send a bug or where i start to see why this happened or its
>> only
>> > > happened only to me!
>> > >
>> > >
>> > > Lenz McKAY Gerardo (PICCORO)
>> > > http://qgqlochekone.blogspot.com
>> > > 
>> > > --
>> > > Check out the vibrant tech community on one of the world's most
>> > > engaging tech sites, Slashdot.org! http://sdm.link/slashdot
>> > > ___
>> > > Gambas-user mailing list
>> > > Gambas-user@lists.sourceforge.net
>> > > https://lists.sourceforge.net/lists/listinfo/gambas-user
>> > >
>> > 
>> > --
>> > Check out the vibrant tech community on one of the world's most
>> > engaging tech sites, Slashdot.org! http://sdm.link/slashdot
>> > ___
>> > Ga

Re: [Gambas-user] Gambas-user Digest, Vol 132, Issue 29

[Unaise EK]

this is my code for displaying data in listbox, but it did not working, pls
help

Public Procedure AddList()
  Dim ListQurey As String
  Dim Lresult As Result

  ListQurey = "SELECT name FROM name_tbl"
  Lresult = MODMain.MyConn.Exec(ListQurey)
  If Lresult.Count > 0 Then
  *  Do While Not Eof(Lresult)*
  ListBox1.Add(Lresult!"name")
  Lresult.MoveNext
Loop
  Endif

End




   Sent with Mailtrack


On Wed, May 24, 2017 at 10:26 AM, Dimitris Anogiatis 
wrote:

> Does the same behavior occur with a wired keyboard (not your wireless
> Logitech K330)?
>
> On Tue, May 16, 2017 at 3:48 AM, Glaucio Araujo <
> glaucio.de.ara...@gmail.com
> > wrote:
>
> > Hi, Jussi
> >
> >
> > My Xorg.0.log is in ~/.local/share/xorg/
> >
> > Log attached.
> >
> > My Xinput:
> >
> >
> > gda@acer:~$ xinput list
> > ⎡ Virtual core pointerid=2[master pointer
> (3)]
> > ⎜   ↳ Virtual core XTEST pointer  id=4[slave  pointer
> > (2)]
> > ⎜   ↳ Logitech M215 2nd Gen   id=11[slave
> pointer
> > (2)]
> > ⎜   ↳ Logitech K330   id=10[slave
> pointer
> > (2)]
> > ⎜   ↳ ETPS/2 Elantech Touchpadid=13[slave
> pointer
> > (2)]
> > ⎣ Virtual core keyboard   id=3[master keyboard
> (2)]
> > ↳ Virtual core XTEST keyboard id=5[slave
> keyboard
> > (3)]
> > ↳ Power Buttonid=6[slave
> keyboard
> > (3)]
> > ↳ Video Bus   id=7[slave
> keyboard
> > (3)]
> > ↳ Power Buttonid=8[slave
> keyboard
> > (3)]
> > ↳ Sleep Buttonid=9[slave
> keyboard
> > (3)]
> > ↳ AT Translated Set 2 keyboardid=12[slave
> keyboard
> > (3)]
> > ↳ Acer WMI hotkeysid=14[slave
> keyboard
> > (3)]
> > ↳ Logitech K330   id=15[slave
> keyboard
> > (3)]
> > ↳ HD WebCam   id=16[slave
> keyboard
> > (3)]
> >
> >
> >
> >
> >
> >
> > ---
> >
> > Gláucio de Araujo
> >
> > Mail : glaucio.de.ara...@gmail.com
> > TIM  : (11) 95900-7801 (WhatsApp / Telegram)
> >
> >
> > Date: Mon, 15 May 2017 23:54:16 +0300
> > > From: Jussi Lahtinen 
> > > Subject: Re: [Gambas-user] Keyboard locked -- insisting one more time
> > > To: ferna...@fcabral.com.br,mailing list for gambas users
> > > 
> > > Message-ID:
> > > 

Re: [Gambas-user] when i used collections on my code, gambas get hangs!

[Unaise EK]

can you give example for
DO WHILE NOT database EOF

Loop




   Sent with Mailtrack


On Thu, May 25, 2017 at 8:30 AM, PICCORO McKAY Lenz 
wrote:

> there are the piece of code and here there's no secret:
>
> Public Function getItems() As Collection
>
>   Dim $items As New Collection
>   Dim itema, itemb as String = "something"
>
>   $items.Add($itema, "item1")
>   $items.Add($itemb, "item2")
>   $items.Add(2, "cuantos")
>
>   Return $items
>
> End
>
> here the previous code "bad programed" and when i swicht to collection
> gambas ide get slower after some time, the code was:
>
> Public Function getItems() As String[]
>
>   Dim $items As New String[]
>   Dim itema, itemb as String = "something"
>
>   $items.Add($itema)
>   $items.Add($itemb)
>
>   Return $items
>
> End
>
> the gambas ide and the OS was not shutdown during 40 days, also the gambas
> ide was not quit in this period, and in that period i run the huge data
> code of the 3 odbc bug with 10 registers, after change the code to
> collection  (each change are little before test) thje ide gambas get slow
> and does not run well..
>
> this happened to my other partners in the job... i test also in debian
> jeesie and happened same!
>
> i noted that when alone user said something its like "nothigs its happened,
> its just bad programer"
>
> will need other to reports, but these other do not have time to make a
> little project and report that..
>
> sqlite was severi broken until gambas 3.6 and must be rewrite for gambas
> 3.8
>
> now in gamba 3.9 ther's some doc-online problems with cache and some memory
> manage problems..
>
> but for not specialized programmers its very difficult to debug, find and
> report LIKE THE QT problem..
>
>
>
> Lenz McKAY Gerardo (PICCORO)
> http://qgqlochekone.blogspot.com
>
> 2017-05-24 17:01 GMT-04:30 Jussi Lahtinen :
>
> > Impossible to say anything without seeing the code, which causes the
> > problem.
> >
> >
> > Jussi
> >
> > On Thu, May 25, 2017 at 12:11 AM, PICCORO McKAY Lenz <
> > mckaygerh...@gmail.com
> > > wrote:
> >
> > > i change the odbc code for huge data to transport only two objects
> with a
> > > string, and i noted that gambas before hangs sometimes... so i
> discovered
> > > that when i used collections the memory management are very bad..
> > >
> > > should i send a bug or where i start to see why this happened or its
> only
> > > happened only to me!
> > >
> > >
> > > Lenz McKAY Gerardo (PICCORO)
> > > http://qgqlochekone.blogspot.com
> > > 
> > > --
> > > Check out the vibrant tech community on one of the world's most
> > > engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> > > ___
> > > Gambas-user mailing list
> > > Gambas-user@lists.sourceforge.net
> > > https://lists.sourceforge.net/lists/listinfo/gambas-user
> > >
> > 
> > --
> > Check out the vibrant tech community on one of the world's most
> > engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> > ___
> > Gambas-user mailing list
> > Gambas-user@lists.sourceforge.net
> > https://lists.sourceforge.net/lists/listinfo/gambas-user
> >
> 
> --
> Check out the vibrant tech community on one of the world's most
> engaging tech sites, Slashdot.org! http://sdm.link/slashdot
> ___
> Gambas-user mailing list
> Gambas-user@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>



-- 
M. Unaise. E.K
9895687604
Librarian,
(BLISc, MLIS)
JDT Islam Polytechnic College,
Vellimadukunnu.
--
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
___
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user