LiveCode Forums.

Code: Select all

on preOpenStack

-- use switch with "the environment" property to determine if the app is running on mobile or in development
   switch the environment

-- if its development, do pretty much what andre was already doing
      case "development"
         -- set default folder
         set the itemdel to "/"
         set the defaultfolder to item 1 to -2 of the effective filename of this stack
         put "databin.sqlite" into tDatabase -- using a variable to store the path to the database file rather than using the path directly in revopendatabase
         break
      case "mobile"
   -- if its mobile, point to where the database should be.
   -- the documents folder is readable and writable.
   -- the engine folder path is only readable.
   -- when the file was included using the "copy files" pane
   -- of the standalone settings, it will end up in the engine folder, next to the executable
   -- but since the engine folder isn't writable you have to copy it to the right place if its not already there.
         put specialfolderpath("documents") & "/databin.sqlite" into tDatabase 

  -- see if the database is already in the documents folder
  -- if not, copy it there from the engine folder
         if there is not a file tDatabase then
            put URL ("binfile:" & specialfolderpath("engine") & "/databin.sqlite") into URL ("binfile:" & tDatabase)
         end if
         break
   end switch

-- since aagDBLib should now be a substack you don't hvae to specify a 
-- path to the file. Just the stack name.
   start using stack "aagDBLib"

-- open the database using the variable tDatabase to point to the file
-- if its on mobile the tdatabase will point to the file in specialfolderpath(documents) 
-- otherwise it will point to a file sitting next to the demo stack.
   get revOpenDatabase("sqlite",tDatabase,,,)

-- catch any errors as andre already did. 
   if it is a number then
      dbSetDefaultConnectionID it
   else
      answer error it
   end if 
end preOpenStack

Code: Select all

#Get data from sqlite
put dbGet("customers") into myArray
   set dgdata of control "datagrid" to myArray

Code: Select all

#filter the data from sqlite
dbWhere "customer_id","first_name","last_name"
put dbGet("customers") into myRecordsA

Code: Select all

dbWhere "customer_id"
put dbGet("customers") into myRecordsA

Code: Select all

tRecordsA[1]["id"] = 1
tRecordsA[1]["first_name"] = andre
tRecordsA[1]["last_name"] = garzia
tRecordsA[1]["email"] = andre@andregarzia.com

Code: Select all

...
repeat for each key tKey in tRecordsA
  put tRecordsA[tKey]["id"] & CR after tOptionMenuList
end repeat
## Delete trailing CR
delete char -1 of tOptionMenuList

## Fill option button:
set the text of btn "your option button here..." to tOptionMenuList
...

Code: Select all

  #fill the data
   dbcolumns "first_name,last_name"
   put dbGet("customers") into myRecords
   
   --repeat
  repeat for each key tKey in myRecords
  put myRecords[tKey]["first_name"] & CR after tOptionMenuList
end repeat
## Delete trailing CR
delete char -1 of tOptionMenuList

## Fill option button:
#for unicode text
set the unicodetext of btn "myopt" to uniencode(tOptionMenuList,"utf8")

Code: Select all

repeat for each key tKey in (the keys of myRecords)
  put myRecords[tKey]["first_name"]["last_name"]& CR after tOptionMenuList

Code: Select all

repeat for each key tKey in (the keys of myRecords)
put myRecords[tKey]["first_name"]["last_name"]& CR after tOptionMenuList

Code: Select all

repeat for each key tKey in (the keys of myRecords)
put myRecords[tKey]["first_name"] && myRecords[tKey]["last_name"]& CR after tOptionMenuList