yeni başladım

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Kilitli
xegelix
Üye
Mesajlar: 21
Kayıt: 22 Kas 2005 12:04

yeni başladım

Mesaj gönderen xegelix »

Merhabalar arkadaşlar,

Öncelikle vereceğiniz yanıtlar için tşk ederim. Bir proje hazırlıyorum bir master bir detail tablom var. Formdan bu tablolara kayıt girilerek taksitlendirme işlemi yapmak istiyorum. Konu ile ilgili forumlardaki mesajları okudum. Yalnız atladığım birşeyler var herhalde.tablelerim şöyle

bilgi (bu mater olanı)
sozno primary key
ad

taksitdb
szno primary key
sozno foreign key
taksittut

bu iki tableyi sozno alanı ile bağladım ve aşağıdaki kodları yazdım.Normalde tablelrin cachedupdate özellikelrini true yaptığımda çalışıyor gibi görünüyor fakat tablolara kayıt yapılmıyor.Özellikleri false yaptığımda da "violation of foreign key constraint fk_musteritaksit_1 on table musteritaksit" hatası alıyorum. Kaç gündür araştırıyorum bu hata mesajını anlatıldığı forumları aradım okudum çözüm yollarını denedim ama nafile bu yüzden çekinerekde olsa sizlere sormaya karar verdim.Kodlar şu şekilde

procedure TForm2.Button1Click(Sender: TObject);
begin

tutar:=strtoint(edit6.text);
pesinat:=strtoint(edit8.Text);
no:=strtoint(edit9.Text);
bakiye:= tutar-pesinat;
taksit:=strtoint(edit7.text);
birim:=bakiye/taksit;
datamodule1.bilgi.Insert;
datamodule1.bilgisozno.Value:=no;
datamodule1.bilgi.Post;
for i:= 1 to (taksit) do
begin
datamodule1.taksitdb.insert;
datamodule1.taksitdbtaksittut.value:= i;
datamodule1.taksitdbtaksittut.Asfloat:=birim;
datamodule1.taksitdbszno.value:=no;
datamodule1.taksitdb.post;
end;
showmessage('Kayıt Yapılmıştır');



Bana bu konuda yol gösterirseniz çok ama çok sevineceğim. Şimdiden teşekkür ederim

Saygılarımla
Kilitli