kıymetlli arkadaşlar uretim tablosu diye bir tablom var ve ben bunu adoquery ile sadece belirli bir alanının dbgridde gözüknmesini sağlıyorum ama buradaki değerleri dbchartın series0 değerine attığım zaman kolonda gözterilen değerlerin haricinde olan değerlerinde databaseden okunduğunu görüyorum.
sadece dbgridde gözüken herhangi bir kolondaki değerleri nasıl okutabiliriz?
dbgrid deki adoquery ile filtre edilmiş bir kolonun okunması
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
unutmadan verdiğim kod ise şu şekildeydi
procedure TForm1.Button1Click(Sender: TObject);
var
i,topkay:integer;
begin
DbChart1.Series[0].Clear;
DbChart1.Series[1].Clear;
with ADOQuery3 do
begin
close;
sql.clear;
sql.add('select * from URETIMTABLE where KULAKNO=4343232 and LACT=0 order by TESTTARIHI asc');
active:=true;
topkay:=recordcount
end;
DBChart1.Title.Text.Clear;
DBChart1.Title.Text.Add ('SÜT LAKTASYON ÇİZELGESİ');
DBChart1.LeftAxis.Title.Caption := 'SÜT lt.';
Edit1.Text:=inttostr(topkay);
for i:=1 to topkay do
begin
DBChart1.SeriesList[0].Addy((ADOURETIMTABLE.Fieldbyname('SUT')).asinteger);
ADOUretimTable.Next;
end;
end;
var
i,topkay:integer;
begin
DbChart1.Series[0].Clear;
DbChart1.Series[1].Clear;
with ADOQuery3 do
begin
close;
sql.clear;
sql.add('select * from URETIMTABLE where KULAKNO=4343232 and LACT=0 order by TESTTARIHI asc');
active:=true;
topkay:=recordcount
end;
DBChart1.Title.Text.Clear;
DBChart1.Title.Text.Add ('SÜT LAKTASYON ÇİZELGESİ');
DBChart1.LeftAxis.Title.Caption := 'SÜT lt.';
Edit1.Text:=inttostr(topkay);
for i:=1 to topkay do
begin
DBChart1.SeriesList[0].Addy((ADOURETIMTABLE.Fieldbyname('SUT')).asinteger);
ADOUretimTable.Next;
end;
end;