Mega Code Archive

Autoincrement için uğraşmayın

****************************************************************************** ***************** Burası Oyun Alanı Değil Bilgi Havuzudur ******************** ***************** Sorularınız ve İstekleriniz Hiç Bir Zaman ****************** ***************** Yanıt Bulmayacaktır. Özel Soru ve İsteklerinizi ************ ***************** Foruma Yada Daha Uzmanlara Mail Atarak Sorunuz ************* ***************** Burada Bilgi Kirliliğine Yol Açmayınız ********************* ***************** Emin Olun Elinden Geldiğince Herkes Yardım Eder ************ ****************************************************************************** arkadaşlar autoincrement için kodbankta birçok yol var ama hepsi genelde maxID üzerinden çalışmakta daha öncede autoincrement hakkında 1 yol göndermiştim ama bu seferki çalışan sqlinizi kasmadan yapılan en kısa yoldan autoincrement. yapılacak işlem 1 - ilk önce ana tablonuzu oluşturun (Örnek Stok_kart) 2 - daha sonra 1 adet REF tablosu oluşturun. (Örnek Stok_KartREF) bu Tablonuzun içeriği ID ve REF olsun ve ID nizi 1 olarak database editör programından girin. 3 - şimdi asıl işlem. kayıt aşamasına geldiğinizide REF tablonuzu açın ve 1 değişken tanımlatıp değişkeninizi REF fieldı ile eşleştirin var z:integer; begin stok_kartREF.activate:=false; stok_kartREF.activate:=true; z:=stok_kartREF.asinteger+1; (Burada son ID mizi Okuttuk) Stok_KartID.value:=z; (aldığımız Son ID yi ana tablomuza işlettik) stok_kart.post; (ana tablomuzu kaydettik) stok_kartREF.edit; (Referans tablomuza son IDmizi eklememiz gerek) Stok_KartrefREF.value:=z; (Aldığımız Son Referansı Ekledik) Stok_KartRef.Post; (Referans Tablomuzu Kayıt ettik) stok_kartREF.activate:=false; evet bu işlemde il aşamada referans tablomuzdan en son kullandığımız ID yi aldık sonra bu alınan ID yi 1 ekleyerek Ana tablomuzun ID sini bulduk. Sonra bu bulduğumuz ID yi referans tablomuza da ekledikki bir sonraki kayıtta tekrar doğru ID yi bulalım. Neden böyle 1 işlem yaptık: düşünün milyonlarca datası olan bir tablo ve bu tyanlo içine kayıt işliyorsunuz max ID veya benzeri 1 şey kullanıyorsunuz tablonun en sonuna gidene kadar oldukça zaman geçecek ve boşu boşuna sadece ID bulmak için Serverınızı şişireceksiniz. yukarıdaki işlemde REF tablosuna kullandığımız en son ID yazıyoruz ve her işlemde bu ID referan alınıyor ve ana tablomuza bu ID 1 artarak yazılıyor ana kayıtla işimiz bittikten sonra REF tablomuzada Yeni bulduğumuz ID yazılıyor. Bol Bilgili Doğru Kodlu Delphi ile barışık günler