26-10-2020, Saat: 00:09
(Son Düzenleme: 26-10-2020, Saat: 12:22, Düzenleyen: Frrst.
Sebep: Kodlar SQL kod bloğuna alındı.
)
Arkadaşlar maalesef şuradaki mesajda belirttiğim üzere SQLite veritabana alan ekleyip güncelleyemiyorum.
Aşağıdaki şekilde bir Query oluşturup FormCreate yordamına "TabloUret.ExecSQL;" yazarak programın çalıştığı dizinde veritabanını oluşturuyorum ancak daha sonra aşağıdaki ekran görüntüsünde kırmızı çerçeve ile eklediğim alanları kayıtlı verilere zarar vermeden ekleyemiyorum.
Veritabanı hiç yoksa oluşturuluyor ancak yeni alan eklediğimde güncelleme yapamıyorum. Benim istediğim kayıtları kontrol edip eğer kayıt yoksa ilgili alanları veritabanına ekleyebilmek
Ek sorular: Kız ve erkek öğrencilerin sayılarını almak için ek bir Query oluşturmak zorunda kaldım ve uzun kodlar yazmak zorunda kaldım. Benimki kulağı tersinden göstermekten bile çok öteye geçti. Örneğin kız öğrencilerin sayısını Label'de göstermek için formun OnCreate yordamına şu kodları yazdım. (Erkek öğrenci sayıları için de aynı işlemi tekrarladım. Her işlem yaptığımda yeni bir Query oluşturmak gerekli mi?)
Telefon numarası göstermek içinse TFDQuery'nin AfterScrool olayına DBEdit3.Field.EditMask := '(5##) ### ## ##'; yazdım. Doğru yapıp yapmadığım konusunda şüpheliyim.
Arkadaşlar vakti olanlar belki bakabilir diye BURAYA kaynak kodları da ekliyorum. Yardımlarınız için şimdiden teşekkürler.
Aşağıdaki şekilde bir Query oluşturup FormCreate yordamına "TabloUret.ExecSQL;" yazarak programın çalıştığı dizinde veritabanını oluşturuyorum ancak daha sonra aşağıdaki ekran görüntüsünde kırmızı çerçeve ile eklediğim alanları kayıtlı verilere zarar vermeden ekleyemiyorum.
Veritabanı hiç yoksa oluşturuluyor ancak yeni alan eklediğimde güncelleme yapamıyorum. Benim istediğim kayıtları kontrol edip eğer kayıt yoksa ilgili alanları veritabanına ekleyebilmek
Ek sorular: Kız ve erkek öğrencilerin sayılarını almak için ek bir Query oluşturmak zorunda kaldım ve uzun kodlar yazmak zorunda kaldım. Benimki kulağı tersinden göstermekten bile çok öteye geçti. Örneğin kız öğrencilerin sayısını Label'de göstermek için formun OnCreate yordamına şu kodları yazdım. (Erkek öğrenci sayıları için de aynı işlemi tekrarladım. Her işlem yaptığımda yeni bir Query oluşturmak gerekli mi?)
QCinsiyet.SQL.Clear; QCinsiyet.SQL.Add ('Select Count (*) AS ToplamKız From Ogrenci Where Cinsiyet = ''Kız'''); QCinsiyet.Open(); LabelKiz.Caption := 'Kız: ' + inttostr(QCinsiyet.fieldByName('ToplamKız') .AsInteger);
Telefon numarası göstermek içinse TFDQuery'nin AfterScrool olayına DBEdit3.Field.EditMask := '(5##) ### ## ##'; yazdım. Doğru yapıp yapmadığım konusunda şüpheliyim.
Arkadaşlar vakti olanlar belki bakabilir diye BURAYA kaynak kodları da ekliyorum. Yardımlarınız için şimdiden teşekkürler.