DBGrid-Column-Row

[fer11]

Kolay gelsin herkese.Arkadaşlar bir DBGrid içerisinde istediğim bir sütunun istediğim bir satırının değerini nasıl elde edebilirim???
Label1.caption:=dbgrid1.columns.grid.fields[0].asstring deniyorum ama ilk satırdaki kayıtların dışındakileri alamıyorum.yardımlarınızı bekliyorum..

[kaank]

tablo.first;
for i := 0 to Tablo.Recordcount do
begin
if i=3 then // 3.satır
begin
ShowMessage(TabloFIELDADI.AsString);
end;
Tablo.Next;
end;

böyle birşey işini çözebilir.

[fer11]

İlgin için çok saol ama direkt dbgridden alabileceğim bir kod mevcut mu acaba.teşekkürler.

[fer11]

Aslında tam olarak istediğim dbgrid in istediğim sutununun istediğim satırını okuyup onun yerine başka bişi yazabilmek...

[conari]

tıklanan alanın değerine

Kod: Tümünü seç

var 
degisken : String;
begin;
degisken:=DBGrid.SelectedField.Value

ulaşabilir.
degiştirmekten kastın, database yazmak ise gridi edit mod aktif ederek girilen bilgiyi post etmen lazım

[fer11]

Aslında döngüye girmesini istiyorum.Yani bir kolonun tüm satırlarındaki değerleri sırası ile okumak istiyorum.Bunu nasıl yaparım acaba.

[sabanakman]

Bir satır ve sütun değerine göre hücreden bilgi okumak:

Kod: Tümünü seç

SatirNo:=??;
SutunNo:=??;
with DBGrid1.DataSource.DataSet do try
  DisableControls;
  RcN:=RecNo;
  MoveBy(SatirNo-RcN);
  Deger:=Fields[SutunNo].AsString;
  MoveBy(RcN-SatirNo);
finally
  EnableControls;
end;
ShowMessage(Deger);

Bu arada DBGrid değerleri ekranda sadece çizim olarak gösterir. Bu değerleri ancak ve ancak bağlı olduğu tablodan okuyabilirsin. Bu değerleri başka hiç bir yerden elde edemezsin. Söylediğine göre bir alanda bulunan tüm değerleri istiyorsun. Bunu da o tabloyu baştan sona tarayarak bulursun Diyelimki bir gridi Table1 nesnesine bağladın ve No alanını tarayacaksın.

Kod: Tümünü seç

Table1.First; Toplam:=0;
while not Table1.Eof do begin
  Toplam:=Toplam+Table1No.AsFloat;
  Table1.Next;
end;

Bunu bir de grid nesnesini kullanarak yapalım. DBGrid Table1 nesnesine bağlı ve ilk sütunu No alanını gösteriyor farzedersek

Kod: Tümünü seç

Toplam:=0; with DBGrid1.DataSource.DataSet do begin
  First;
  while not Eof do begin
    Toplam:=Toplam+DBGrid1.Columns[0].Field.AsFloat;
    Next;
  end;
end;

şeklindeki kod ile bir önceki kod aynı işleri görürler.

[fer11]

teşekkürler arkadaşlar.ilginize.önerilerinize göre bişeyler yapacam.