LiveCode Forums.

Code: Select all

set the dgData of group "dgPeople" to sDataArray

Code: Select all

put pDataArray[1] into the field "lblID" of me
put pdataArray[2] into the field "lblName" of me
set pDataArray[3] into the icon of control "btnImage" of me
put pDataArray[4] into the field "lblAddress" of me

Code: Select all

--Query the DB
    local sDBQuery, sDBData    
    put "SELECT PID, Name, Image, Adress FROM DBPeople" into sDBQuery
    put revDataFromQuery(,,nDBConnectionID, sDBQuery) into sDBData

--Populate the Data Array
    local R, F #Breaking and looking at sDBData here displays the People data as I would expect
    set the itemdelimiter to tab
    set the linedelimiter to cr
    put 0 into R
    repeat for each line sLine in sDBData
        add 1 to R
        put 0 into F
        repeat for each item sItem in sLine
            add 1 to F
            put sItem into sDataArray[R][F]
            put false into sDataArray[R]["expanded"]    #Don't know WHY I do this but the example showed it with no real explanation.
                                                                            #Did look up 'expanded' in the dictionary...
                                                                            #Seems to have little to do with what I'm trying to achieve
                                                                            #(and I get the same results with or without it) but...
        end repeat
    end repeat
    
--Populate the DataGrid
    set the dgData of group "dgProperties" to sDataArray   #Breaking and looking at sDataArray here also displays the data I'd expect
                                                                                    #(I have two distinct entries/records in the Array here

--Behaviour Script (Chunk 1)
    on FillInData pDataArray
        put pDataArray[1] into field "lblID" of me     #Remarking out out all lines in this snippet and simply typing 
                                                                         #local S: put pDataArray[1 [to 4] ] into S
                                                                         #displays my data for each record here 
        put pdataArray[2] into field "lblName" of me
        set the icon of control "btnImage" of me to specialfolder("Documents") & "\Images" & "\" & pDataArray[3]
        put pDataArray[4] into field "lblAddress"
    end FillInData

or Behaviour Script (Chunk 2)
    on FillInData pDataArray
        put pDataArray["lblID"] into field "lblID" of me
        put pdataArray["lblName"] into field "lblName" of me
        set the icon of control "btnImage" of me to specialfolder("Documents") & "\Images" & "\" & pDataArray[3]
        put pDataArray["lblAddress"] into field "lblAddress" of me
    end FillInData

or Behaviour Script (Chunk 3)
    on FillInData pDataArray
        put pDataArray["Col1"] into field "lblID" of me
        put pdataArray["Col2"] into field "lblName" of me
        set the icon of control "Col3" of me to specialfolder("Documents") & "\Images" & "\" & pDataArray[3]
        put pDataArray["Col4"] into field "lblAddress" of me
    end FillInData

Code: Select all

local sDBQuery, sDBData    
put "SELECT PID, Name, Image, Address FROM DBPeople" into sDBQuery
put revDataFromQuery(TAB,CR,nDBConnectionID, sDBQuery) into sDBData
...

Code: Select all

...
local R
set the itemdel to tab

## This is the default -> CR, so not neccessary to set it: 
## set the linedelimiter to cr

## Numeric key OK for ROWS!
put 0 into R

## Here you need to NAME the keys!
## Order or your returned data from db:  PID, Name, Image, Address
repeat for each line sLine in sDBData
       add 1 to R
       put item 1 of sLine into sDataArray[R]["pid"]
       put item 2 of sLine into sDataArray[R]["name"]
       put item 3 of sLine into sDataArray[R]["image"]
       put item 4 of sLine into sDataArray[R]["address"]
end repeat
...

Code: Select all

on fillinata pDataArray
   put pDataArray["pid"] into field "lblID" of me
   put pdataArray["name"] into field "lblName" of me

  ## Presuming that this is a BUTTON where you set its ICON to the id of any image!?
   set the icon of BTN "image" of me to pDataArray["btnImage"]
   put pDataArray["address"] into field "lblAddress" of me
end fillindata

Code: Select all

on FillInData pDataArray
   local S1, S2, S3, S4, S5
   put pDataArray["PID"] into S1
   put pdataArray["Name"] into S2
   put pDataArray["Image"] into S3
   put pDataArray["Street1"] & cr & pDataArray["Street2"] & cr & pDataArray["City"]  & cr & pDataArray["County"] & cr & pDataArray["Postcode"] into S4
  
   put S1 & cr & S2 & cr & S3 & cr & S4 into S5
   answer info S5
   
  
   put pDataArray["PID"] into field "lblID" of me
   put pdataArray["Name"] into field "lblName" of me
end FillInData