Selecting * from DBgrid

Pozdrav svima,

Kako u kodu izaberem sve sto iz baze ucitam u DBgrid? Npr, ako ucitam gomilu integera u dBgrid, kako bih mogao da ih izvucem u niz?

Unapred zhvalan, erekoz

Iteriraj kroz dataset i dodaj vrednost polja u niz.

Hajde samo malo detaljnije, molim te...

Podatke mozes direktno da ocitavas iz DataSeta npr. na sledeci nacin:


U svakom slucaj potrazi u helpu TDataSet za sve property-je i metode.

Ili probaj jednostavno iz Data Seta (posto sa dbgridom moze da bude malo komplikovanije).

Pustis petlju
repeat

code za pravljenje niza

until RS.EOF

Ako trebas da pokupis integere iz recordseta mozes sa TStringList
procedure GetFieldsToArray(rst:TDataSet;fld:TField):TStringList;
var
lst:TStringList;
begin
if not rst.Active then rst.active := True;
if not rst.FindField(fld) then exit;
lst := TStringList.Create;
rst.First;
while not rst.EOF do
begin
lst.Add(rst.FieldByName(fld.FieldName).AsString);
rst.Next;
end;
result := lst;


end;

a mozes i da kreiras niz umesto lst
var
arr : array of Integer;
iCount, i :Integer;
begin
iCount := rst.RecordCount;
SetLength(arr,iCount);
for i := 0 to iCount-1 do
begin
arr := rst.FieldByname(fld.Name).AsInteger;
rst.Next;
end;