Üçü bir arada

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
Serhat
Üye
Mesajlar: 203
Kayıt: 27 Tem 2014 11:10

Üçü bir arada

Mesaj gönderen Serhat »

İyi akşamlar.

Databaseden listviewe kayıtları çekiyorum, çektikten sonrada listviewde yeni kayıt, güncelleme ve silme işlemlerini tamamlıyorum, sonrasında yaptığım değişiklikleri databaseye kaydetmek için işlemimi başlatıyorum, Insert ve Update de sorun yok delete işlemi yaptıramıyorum bu durumu nasıl çözebilirim?

Tüm olay listview alanım boş ise (= 0) yeni kayıt, dolu ise (>= 1) güncelle, listview de silinen bir kayıt ( <>) databaseden nasıl silinir???

Kod: Tümünü seç

 for I := Items.Count - 1 downto 0 do
begin
    if Length(Items[I].SubItems[19]) = 0 then
  begin
          
 Insert kodlar------->
          
 end
 else
 begin
  if Length(Items[I].SubItems[19]) >= 1 then
 begin
              
Update  kodlar------->
             
 end
 else
begin
 if IdNumber <> StrToInt(Items[I].SubItems[19]) then
 begin
Close;
 SQL.Clear;
SQL.Add('Delete From ARGE');
 SQL.Add('Where ID =' + Items[I].SubItems[19]);
ExecSQL;
end;
end;
Kullanıcı avatarı
Kuri_YJ
Moderator
Mesajlar: 2248
Kayıt: 06 Ağu 2003 12:07
Konum: İstanbul
İletişim:

Re: Üçü bir arada

Mesaj gönderen Kuri_YJ »

Selamlar,

Neden Listview kullanıp işlemleri manuel kendiniz yapıyorsunuz? Yani Listview'i ne amaçla kullanıyorsunuz? Çünkü bu tür olaylar biraz sıkıntılı olur. Yani silinen kayıtları bir başka listeye almalısınız ki o liste üzerinde dönüp, databaseden de silme işlemini gerçekleştirebilesiniz.

Bence Listview'i DBListview gibi bir şey ile değiştirin. Yani o bölümdeki mantığınızı bir daha gözden geçirin.

Kolay Gelsin
Kuri Yalnız Jedi
Harbi Özgürlük İçin Pisi http://www.pisilinux.org/
Cevapla