Delphi Forum

Fastreport içinde OnBeforePrint olayı. Defalarca yaptığım bir olay. Yazdığınız kodu buraya atın, bir bakalım. Ayrıca değeri ekrana yazdırıp, bir bakın. Doğru değer mi geliyor? Kolay gelsin. Hocam, yazdığım kod aşağıdaki gibi... procedure Page1OnBeforePrint(Sender: TfrxComponent); begin if (<frxStok...

Eğer bayrak sayısı çok fazla ise, ilgili dataset ile direk resmi dönün ve image nesnesi ile gösterin. Eğer sadece 2-3 bayrak varsa, hepsini ayrı ayrı image ile ekleyin. onBeforePrint olayında değeri kontrol ederek resmin görünürlüklerini ayarlayın. if (<ULKE> = 'TR') then RESIM_TURKIYE.Visible := T...

Merhaba;
Firebird veritabanında ki bir alana göre (ki alan string değerli) FastReport'ta bulunan bir alanda resim göstermek istiyorum.
Mesela alan değeri 'Türkiye' ise Türk bayrağı, 'ABD' ise amerikan bayrağı çıksın istiyorum.
FastReport'ta if kullanmak mümkün mü? Nasıl?

ozcank yazdı: ↑03 Oca 2019 06:10 Merhaba ; Trigger içerisne mi kod döngüsünü kurmalıyım ?

Evet firebird'de if () then yapısını kullanabilirsiniz.

mussimsek yazdı: ↑02 Oca 2019 09:10 Trigger'ın içinde kontrol ettirseniz değeri.

Trigger her zaman aktif olsun. İstediğiniz parametreyi veritabanına yazın. Trigger değeri kontrol etsin, ona göre çalışsın.

Kolay gelsin.

Yapmaya çalıştığınız şey doğru değil.
Mustafa hocam tam olarak doğru çözümü yazmış.

Arttırmak isdeğiniz değer ne (/nerede) ise onu yazmanız gerekecektir. Artırmak istedigim deger carikoduna gelen son kod sorunda orda onu yazmam gerektigini biliyorum ama nerden cekmem gerektigini bilmiyorum. Ornegin 3 kaydim var C0001, C0002,C0003 son kaydim C0003 ondan sonra yeni eklemek istedigim...

Firebird kullandiginizi varsayiyorum.bir storedprocedure tanimlarsiniz. Beforeinsert triggerinde call yaparsiniz. Storedprocedure icinde, en son eklenmis olan C-Numarasini get eder, akabinde parse eder, integer deger elde edip Increment yapar, daha sonra elde ettiginiz bir üst rakami ayirdiginiz Ch...

Yukarıdaki hata ile genellikle bir string veriyi datetime formatına çevirirken karşılaşılır. Öncelikle datetime formatına çevirmek istediğiniz string verinin çevrilebilir bir şekilde geldiğinden emin olun. Fakat bazen normal bazen değil demeniz kafamı karıştırdı. Kodlarınızı ve datasetteki alanınızı...

Merhaba arkadaşlar öncelikle cevaplarınız için teşekkürler sınavım vardı cevap yazamadım ama husonet in yazdığı kodu denedim ama sürekli 1 geri atıyor ben atıyorum kod C0001 ise C0002,C0003,... vb. diye her yeni kayıt eklemek istediğimde +1 devam etsin istiyorum. Kardeş bi yanlışlık yapmışsın belli...

Evet biraz öyle gibi görünüyor ama bir yolu vardır diye düşündüm :) Kısaca; Master tablom var, detay tablomda ücret girişi yapılıyor ve giriş değiştikçe master tablodaki fiş toplamı alanının değişmesi gerekiyor. Detay tablodaki ücret alanına bilgi girişi yapılırken field'den çıkıldığında master tab...

function Numarator(no: string): string; function TersCevir(nu: string): string; var Cevrilen: string; i: Integer; begin Cevrilen := ''; for i := length(nu) downto 1 do begin Cevrilen := Cevrilen + nu[i]; end; Result := Cevrilen; end; var Nmr, Temp: string; i, Tmp: Integer; begin Nmr := TersCevir(no...

Estağfurullah... Terazi servisini arayıp doğrudan "BİLGİSAYAR İLE NASIL BAĞLANTI YAPACAĞIM" diye sorun... Onlar size gerekli detayları ve parametleri içeren bir döküman vereceklerdir... Sonrasında ilk adım Delphi de küçük bir programcık yazarak terazi ile bilgisayar arasında iletişimi sağ...

FetchAll çalışmıyor mu hocam?

Terazi üzerinde tartılan ürünün gramajını doğrudan almak için TERAZİ ile iletişim kurmanız gerekmektedir... Bunun için Terazi ile RS-232, USB ya da Ethernet üzerinden haberleşebilirsiniz... Terazi ile Hangi kanaldan hangi protokol ile İletişim iletişim sağlayabileceğinizi Terazi Satıcısı ile görüşm...

Güncel