İlginç Bir Form Create Hatası

[mrmarman]

Kızıyorum çünkü soru bu hatanın kaynağını bildiğini belirttiğin şekilde değil üstü kapalı sorup vakit çalıyor olmandan.

Basitçe veritabanı bağlantı ve fonksiyonlarını datamodule altına toplayıp, bu datamodule'ü dpr proje dosyanda create sıralamasında en üste al diyebilirdik. Ama soru ve akış örgüsü buna müsaade etmedi.

[gaus]

........Yanlış Anlaışlma..........

[freeman35]

Hocam sizin vakitlerinizi çalmaktan onur duyarım

Bu nasıl bir zihniyettir arkadaş, DİL mi bilmezsiniz, DİN mi bilmezsiniz.

sizin gibi değerli bir hocanın

Belliki mesele, ben gene takılıcam, işimi gördürtecek birini bulmuşum, yıka yağla. ALLAH' a çok şükür ki bizler (forum da cevap verip ATATÜRK'ün gençliğine birşeyler öğretmeye çalışan kitle) ne paye nede taktir peşindeyiz, ne camii hocalarıyız nede üviversitelerki sefil yalanma sevdalılarındanız.

[gaus]

Şimdi bu dediğinize karşı çıkmak zorundayım;
Muharrem Hocayı 2 seneden beridir takip ederim yıkama yağlama olarak algılıyorsanız ayıp etmiş olursunuz;
Saygı diye de birşey var
Muharrem Hocayı eski forumdan da yardımlarını biliyorum
Bu foruma gelerek öğrenmedim yani....

[unicorn64]

Hocam sizin vakitlerinizi çalmaktan onur duyarım

bkz. kaş yapayım derken göz çıkarmak
bkz. özrü kabahatinden de beter

[m_yaprakci]

Kod: Tümünü seç

begin
  toplam:=0;
  kdv:=0;
  with dm_.vt_siparis do
  begin
    first;
    while not eof do
      begin
         toplam:=toplam+fieldbyname('TOPLAM').AsFloat;
         kdv:=kdv+fieldbyname('KDVTUTAR').AsFloat;
         NEXT;
      end;
  end;
end;

bunun aynısını DM_ formuna yani datamodule'e ekle ordan çağır olsun bitsin.
hatta bu procedure'ü sadece DM_ 'ne at heryerde ordan çalıştır.
DataModule formunun uses kısmında Forms, messages,Dialogs gibi şeyler olmaz zaten.
ama DM_ isimli formun Datamodule değil de standart form ise de USES kısmında sadece SysUtils, Classes kalsın gerisini sil.

[gaus]

Sağolasın sorunumu başka bir yol ile hallettim ama procedurumun içinde bir label olması gerekiyordu ben ise buradan bir function yapıp atadım hepsi buyd gene de teşekkürler