programın belirli değerlerde uyarması?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
must_sargin
Üye
Mesajlar: 216
Kayıt: 14 Şub 2004 03:13
Konum: Gebze
İletişim:

programın belirli değerlerde uyarması?

Mesaj gönderen must_sargin »

iyi çalışmalar,
benim sorum bazı programlarda gördüğüm bir olay, ayar adlı formda
'stok değeri birinci değerden küçükse ve ikinci değerden büyükse uyar'
şeklinde iki edit'le değerler girilmiş. if..then..else döngüsünü kurmama rağmen program çalışma anında hata veriyor. acaba nerede yanlışlık yapıyorum?
şimdiden teşekkürler.
P206
Kıdemli Üye
Mesajlar: 395
Kayıt: 17 Haz 2003 12:36
Konum: İstanbul

Mesaj gönderen P206 »

Biraz daha açıklayıcı olur ve yazdığın kod ve aldığın hatayı yollarsan
daha rahat yardımcı olabiliriz.


İyi Çalışmalar.
I love my car.
Blog Yaptık
must_sargin
Üye
Mesajlar: 216
Kayıt: 14 Şub 2004 03:13
Konum: Gebze
İletişim:

Mesaj gönderen must_sargin »

data validation hataları veriyor. acaba ayar formuyla stokların kaydını tuttuğum tablo arası ilişkilendirme hatasında olabilir mi?
bgoktas
Kıdemli Üye
Mesajlar: 769
Kayıt: 27 Nis 2004 10:32
Konum: istanbul

Mesaj gönderen bgoktas »

Bunu stored proc veya trigerlerle yapabilirsin. :ara: ma yaparak sp veya trigerlerle ilgili birçok dökümana ulaşabilirsin.

İf-then-else ile yaparken, stok(veya hangi tablo ise) tablosunda after post olayına ilgili kriterden düşükse veya fazlaysa uyar diyebilirsin.
must_sargin
Üye
Mesajlar: 216
Kayıt: 14 Şub 2004 03:13
Konum: Gebze
İletişim:

Mesaj gönderen must_sargin »

iyi çalışmalar,
dediğiniz gibi yaptım ve ayar formundaki değerlere göre uyarı veriyor. çok teşekkürler. :)
Kullanıcı avatarı
bobasturk
Kıdemli Üye
Mesajlar: 1387
Kayıt: 20 May 2004 08:39
Konum: Düzce

Mesaj gönderen bobasturk »

Hayırlı geceler.

Bizimde böle bi uyarı verdirme isteğimiz var. Tablomdaki detaylar alanına giriş yapıldığında ana form üzerinde bulunan label de yazılı uyarı içeriğinin görünmesini istiyoruz.

Kod: Tümünü seç

procedure TFormArsivTescil.IBDataSet1AfterPost(DataSet: TDataSet);
begin
  ibdataset1.Transaction.CommitRetaining;
  if formArsivTescil.IBDataSet1DETAYLAR.text =not null then
  begin
  label36.Visible :=true;
  end;
Beforepost ta denedim olmadı acaba bunu nasıl yapabiliriz.

VT=Firebird
Delphi=7
ibdataset1DETAYLAR=Blob+text

teşekkür ve saygılarla
Kullanıcı avatarı
aslangeri
Moderator
Mesajlar: 4322
Kayıt: 26 Ara 2003 04:19
Konum: Ankara
İletişim:

Mesaj gönderen aslangeri »

S.A.

Kod: Tümünü seç

if formArsivTescil.IBDataSet1DETAYLAR.asstring='' then
text alanlarda şeklinde kontrol edebilirsin.
kolay gelsin.
Duyduğun Şeylerin Söylediklerim Olduğuna Eminim Ama
Anladığın Şeylerin Anlatmak İstediklerim Olduğuna Emin Değilim
Cevapla