SQL kayıt girişi

[MoSoft]

3 alanlı bir tablom var.

bir iki üç
1 1 1
1 2 2
2 1 3
3 1 4
2 2 5 gibi

edit e sayı yazıldığında bu sayı birinci alana yazılcak,
ikinci alana editte yazan sayının birinci alandaki kaç tane olduğuna bakıp üstüne bir ekleyip yazacak,
üçüncü alanada bir deki sayıların kaç tane olduğunu bulup üstüne bir eklicek,

Adotable ile yapmaya çalıştım. İkinci alanı bi türlü yapamıyorum .
Access kullanıyorum ado yada sql fark etmez şimdiden yardımlarınız için teşekkürler.

[nitro]

ikinci alana editte yazan sayının birinci alandaki kaç tane olduğuna bakıp üstüne bir ekleyip yazacak,
üçüncü alanada bir deki sayıların kaç tane olduğunu bulup üstüne bir eklicek,

kısmını örnek üzerinde açıklarsan daha kolay anlaşılır bence,
zira ben bu cümleden bişey anlamadım.
kolay gelsin

[ulu coder]

kısmını örnek üzerinde açıklarsan daha kolay anlaşılır bence,
zira ben bu cümleden bişey anlamadım.
kolay gelsin

nitro abim, örnek verilmiş.
Önce ben de anlamadım.
Anladığım kadarıyla verilen örneği açıklayayım;
edit'e girilen değer: 1 -> ilk sütuna yazıldı.
1 değeri daha önce 0 kez girilmiş, bir fazlası: 1 -> ikinci sütuna
birinci alanda 1 tane sayı var: 1-> üçüncü alana.

Bu üçüncü alan AutoInc gibi...
ikinci alanın değeri şu şekilde bulunabilir:

Kod: Tümünü seç

function IkinciAlan(BirinciAlanDegeri: Integer): Integer;
begin
  with Query1, SQL do
  begin
    Close;
    Text := 'select count(*) from TABLEADI where ALAN1 =:Param1';
      //select count(*) = kayıt sayısını buldurur
    ParamByName('Param1').AsInteger := BirinciAlanDegeri;
    Open;
    Result := Fields.Fields[0].AsInteger +1;
      //Fields.Fields[0].AsInteger = select count(*) ile bulunan değeri verir
    Close;
  end;//with
end;//IkinciAlan

count'u artık bildiğinize göre 3. alanı siz bulursunuz

[sabanakman]

insert into tablo values (:Sayi,(Select count(Alan1) from tablo where Alan1=:Sayi), Select count(Alan1) from tablo)

[MoSoft]

Sağolun beyler çözdüm.