dataset hakkında

[seperate]

Merhabalar arkadaşlar...
Öncelikle şunu belirtmek istiyorum. Sitenin offline halini indirdim gerçekten en pahalı kitaptan daha etkili ve daha somut bence... Emeği geçen herkese sonsuz teşekkürler. Arkadaşlar ben offline siteyi aradım ve datasetler hakkında aradığımı bulamadım. Sorum şu , bir uygulamam var dataset kullanıyorum ve

formcreate olayında dataset içini :

Kod: Tümünü seç

 dataset.close;
             dataset.commandtext := 'select adi,soyadi from veritablosu' ;
             dataset.open;
   

yaparak dolduruyorum. Program çalışırken girdiğim değerleri ekranda göstermek istediğimde tekrar aynı işlemi yapıyorum fakat programın çalışma esnasında eklediğim değerler ekrana basılmıyo ???

Kod: Tümünü seç

dataset.Open;

  for dongu:=1 to 6 do
  begin
  dataset.Close;
  dataset.CommandText := 'select adi, soyadi,dogumtarihi from veritablosu where month(dogumtarihi)='+inttostr(dongu);
  dataset.Open;
      for dongu2:=1 to dataset.RecordCount do
      begin
        str1.Cells[dongu-1,dongu2]:= datasetadi.Value + ' ' + datasetsoyadi.Value + '('+ inttostr(dayof(datasetdogumtarihi.AsDateTime)) + ')' ;
        dataset.Next;
      end;
      dataset.Close;
  end;
      dataset.Open;
      dataset.Refresh;

formu oncreate olayına yazdığım kod bu ... Yardımcı olursanız sevinirim ... Yapmam gereken yeni kaydı eklediğimde programı aç kapa yapmadan eklenen kaydın gösterilmesi... teşekkürler kolay gelsin...

[husonet]

Sql'i Döngü bitimindeki open'dan önce bir kez daha ver.

Kod: Tümünü seç

  dataset.Close;
  dataset.CommandText := 'select adi, soyadi,dogumtarihi from veritablosu';
      dataset.Open;

Kolay Gelsin...