dbgridde tıklanan kolonun bulunması

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
a_o
Üye
Mesajlar: 84
Kayıt: 18 Eki 2005 04:41
Konum: Tekirdağ

dbgridde tıklanan kolonun bulunması

Mesaj gönderen a_o »

merhaba arkadaşlar

dbgridde tıklanılan kolona göre kayıt sildircem. mesela 7.kolonun tıklanıp tıklanılmadığını kontrol ettirip o satırı sildircem. hangi kolonun tıklanıldığını nasıl anlayabilirim? bunu nasıl yapabilirim?

kolay gelsin
herkese iyi çalışmalar
Kullanıcı avatarı
mucar
Kıdemli Üye
Mesajlar: 247
Kayıt: 17 May 2005 01:14

Mesaj gönderen mucar »

Kod: Tümünü seç

procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
adotable1.Delete;
end;
şeklinde yapabilirsin.
"Evine bakmaktan aciz olan; ilerici, üç kıtaya hükmeden ecdadın mı gerici?"
a_o
Üye
Mesajlar: 84
Kayıt: 18 Eki 2005 04:41
Konum: Tekirdağ

Mesaj gönderen a_o »

benim istediğim o şekilde değil. sadece 7.kolona tıklanıldığı zaman silme işlemi yapsın. 7 haricindeki kolonlara tıklanıldığı zaman silme işlemi yapmayacak. o yüzden de 7.kolona tıklanıp tıklanılmadığını kontrol etmem lazım. :(
ertline
Üye
Mesajlar: 137
Kayıt: 23 Nis 2005 09:15
Konum: Bartın
İletişim:

Mesaj gönderen ertline »

Kod: Tümünü seç

if DBGrid1.SelectedField.FieldName ='ALAN_ADI' then //alan adı büyük harf olacak ve gridde ki alanın adının aynısı olacak
begin
table.delete;
end;
kolay gelsin
"Bilginin Doruğuna Hep Birlikte..."
Kullanıcı avatarı
mucar
Kıdemli Üye
Mesajlar: 247
Kayıt: 17 May 2005 01:14

Mesaj gönderen mucar »

veya

Kod: Tümünü seç

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
if Column.ID=7 then
ADOTable1.Delete;
end;
"Evine bakmaktan aciz olan; ilerici, üç kıtaya hükmeden ecdadın mı gerici?"
a_o
Üye
Mesajlar: 84
Kayıt: 18 Eki 2005 04:41
Konum: Tekirdağ

Mesaj gönderen a_o »

ertline dediğin gibi yaptım. ve oldu. :lol: çok tşk ederim hepinize.
kolay gelsin
ii çalışmalar herkese
Cevapla