Delphi Forum

@undefined teşekkürler, şimdi sorunu düzelttim.

Doğru fonksiyon;

function ara_sinav_orta_uyelik_fonksiyonu_bolge2(araSinav, ortalamaSinavlar, enIyiNot:Integer):Real;
var x,x1,y1,y2:Integer;
y,x2,ortalamaSinav:Real;
begin

ortalamaSinav:=(enIyiNot + ortalamaSinavlar) / 2 ;

x:=araSinav;
x1:=0 ...

Selam arkadaşlar,

Bir fonksiyon yazdım ama sürekli "Incompatible Types: 'Integer' and 'Extended' hatası..." hatası veriyor. Ne yaptıysam olmuyor.

Fonksiyon doğru denklemini hesaplayıp sonucu gönderecek;

function ara_sinav_orta_uyelik_fonksiyonu_bolge2(araSinav, ortalamaSinavlar, enIyiNot:Integer ...

Cevaplar için teşekkürler arkadaşlar,

Cevabı yine bizim sitemizde buldum.

DelphiTürkiye

Şu anda ufak bir sorunum daha var ama sanırım bunu çözebilirim.

Tekrar teşekkürler.

Hangi veritabanı olduğunu yazmamışsınız :!: Anladığım kadarı ile master tablodan bakiyeyi okumak istiyorsunuz. ....

Selam

FireBird veritabanını kullanıyorum. Hayır master tablodan bakiye bilgisini okumak istemiyorum. Master tablodaki toplam bakiye bilgisine her işlemden sonra müşterinin toplam ...

Selam arkadaşlar;

Ufak bir sorunum var ama (daha doğrusu ben öyle düşünüyorum :roll: ) işin içinden çıkamadım. Yaptığım bir veritabanı programında ana tabloda müşteri bilgilerinin kaydı yani adı soyadı tarzı klasik bilgilerin yanında toplam bakiyesi tutuluyor, detay tabloda da geldiği tarih ...

Selam

Acaba @FAOsoft arkadaşın verdiği formatlı yazma işlemi nasıl kullanılıyor?

Edit1.Text:=formtyaz(Edit1.Text);

şeklinde yaptım ama olmuyor. Kısacası Bir çok Edit ve Memo bileşeninin olduğu bir formda acaba böyle tek bir fonksiyon veya procedure ile nasıl bu şekilde bir cümle formatlama ...

selam @rsimsek hocam,

İlgin için gerçekten teşekkürler ama maalesef bunlarda olmadı. Bİr ihtimalde IBX bileşenlerini güncellemek kaldı. Ama nasıl güncelleyeceğimi bilmiyorum. Bu konuda da yardım edebilirseniz sevinirim.

Selam @rsimsek hocam;

Malesef sorun devam ediyor ama ilginiz için çok teşekkürler. Ben de IBQuery'e geçtim sorun düzeldi. Kodlarda hiçbir değişiklik yok ama IBDataSet'te çalışmıyor. Kodları tekrar veriyorum;

dm.dstNotlar.Close;
dm.dstNotlar.SelectSQL.Strings[1]:='';
dm.dstNotlar.SelectSQL ...

dm.dstNotlar.SelectSQL.Add('select ....');

dediğiniz şekilde de yaptım ama malesef olmadı. Tekrar sıralama satırlarını çıkarttım çalıştı.

Ayrıca direk programlama sırasında SelectSQL in içerisine,

select * from TBL_NOTLAR where 1=1
and NOT_ACIKLAMA like :acklm

order by NOT_UYARI_TARIHI ...

sorun parametre gönderiminden kaynaklı olabilir. daha önce aynı hatayla ben de karşılaşmıştım. IBQuery de hata almaz iken IBDataset te parametre hatası almıştım. sorun IBDataset in parametre olayından kaynaklı olduğu kanaatindeyim.

iyi ama "order by" ile ne alakası olabilir ki? order by ile ...

Merhaba,

Dediğiniz gibi dm.dstNotlar.SelectSQL.Clear yaparsam daha sonra

dm.dstNotlar.SelectSQL.Strings[1]:='and NOT_ACIKLAMA like :acklm';

gibi bir satır eklediğim zaman IBDataset içersinde öyle bir satır yok diye hata veriyor. Yani benim programlama sırasında IBDataSetin SelectSQL içerisine ...

Ben IBDataSet kullanıyordum. Daha sonra aynı kodları IBQuery ile denedim IBQuery ile çalışıyor. Acaba IBDataSet te bilmediğim bir ayar falan mı gerekiyor...?

a.s.

Dediğiniz gibi yaptım ama herşey istediğimi gibi oluşuyor. Memo da oluşan SQL


select * from TBL_NOTLAR where 1=1
and NOT_ACIKLAMA like :acklm

order by NOT_UYARI_TARIHI
desc


şeklinde oluşuyor. Arada ki boşluğu ben oluşmasını istiyorum. Yani IBDataset in EditSQL içerisinde ben 5 satır ...

Selam arkadaşlar,

Bir programda select ile bir arama yapmak istedim. Notları tutan tek tablolu bir veri tabanından arama yapmak istiyorum. Arama kriterlerinide iki tane RadioGrup bileşenlerinden belirleyerek yapıyorum.

Yazdığım kod aşağıdaki şekilde;


dm.dstNotlar.Close;
dm.dstNotlar ...

Selam arkadaşlar,

Sorunum Yedekleme işlemini yapıyor ama Geri Yükleme işlemi sırasında bir hata veriyor.

Verdiği hata,

http://img180.imageshack.us/img180/4968/backupfr6.jpg

Aşağıda yazdığım kodlar bulunmaktadır.

Yardımlarınızı bekliyorum. Şimdiden teşekkürler...


BackUp Kodları ...