delphi - Using database entries as function parameters -
delphi - Using database entries as function parameters -
i using delphi access pgsql database using components:
adoquery, adoconnection , datasource , dbgrid.
i 've seen convenient nowadays info in tstringgrid (rather dbgrid)so using code below:
procedure tform2.stringgrid1click(sender: tobject); var x,y: integer; begin stringgrid1.colcount := dbgrid1.columns.count; stringgrid1.rowcount := dbgrid1.datasource.dataset.recordcount+1; stringgrid1.fixedcols := 0; y := 0 dbgrid1.columns.count-1 stringgrid1.cells[y, 0] := dbgrid1.columns[y].title.caption; x := 1; dbgrid1.datasource.dataset.disablecontrols; dbgrid1.datasource.dataset.first; while not dbgrid1.datasource.dataset.eof begin y := 0 dbgrid1.columns.count-1 stringgrid1.cells[y,x] := dbgrid1.datasource.dataset.fieldbyname(dbgrid1.columns[y].fieldname).asstring; inc(x); dbgrid1.datasource.dataset.next; end; dbgrid1.datasource.dataset.enablecontrols; end; the database has 2 columns of g , t info respectively. now, in different project, have made number of functions setting g,t parametres indicated below:
function findsomething(g, t:double):double; what asking how can utilize g, t parametres, function, cell entries above database columns? new @ , it's been tricky way. help much appreciated.
function delphi adoconnection
Comments
Post a Comment