Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Child formlarda create yordamının çalışma sırası
#11
D7 il denedim herhangi bir problem yok.
WWW
Cevapla
#12
(18-10-2019, Saat: 11:42)frmman Adlı Kullanıcıdan Alıntı: Son gönderdiğiniz kodu derleyince ilk çalıştırmada ve formu kapatıp tekrar denemelerde hep onCreate çalışıyor.

Kodun içerisinde data.mdb olmadığı için aşağıdaki kısım pasif edilerek denendi.

procedure Tdm.DataModuleCreate(Sender: TObject);
begin
   // ADOConnection1.Connected:=True;
   // ADOQuery1.Active:=True;
end;

Hocam kusura bakmayın data.mdb yedeklemenin içine girmiyor manuel eklemem gerekirdi.
Sizleri epey yordum.
Söylediğiniz doğru.Data olayı olmayınca zaten editchange otomatik devre dışı kalıyor.
Create tek başına kalıyor.
data.mdb yi ve projeyi data.mdb içerir halde ekte gönderiyorum.
Test ettiğinizde önce onedithhange eventinin tetiklendiğini göreceksiniz.


Ek Dosyalar
.zip   data.zip (Dosya Boyutu: 11,82 KB / İndirme Sayısı: 3)
.zip   Test.zip (Dosya Boyutu: 20,48 KB / İndirme Sayısı: 2)
Cevapla
#13
Merhaba,
Olayı az çok kendimce çözdüm. Yani tamamen bellek ile empati yaparak yaklaştım.
DataModul uygulama başlar başlamaz create ediliyor. Connection yapılıyor create yordamında. 
Sonrasında create edilmemiş bir formun içinde bulunan (dbedtKimlik) nesneye property üzerinden atama yapılıyor.
Kısaca "iş talep formu"'nu çağırdığınız butonun onclick eventine şu şekilde bir kod eklemesi yaparsanız düzenli çalıştığı görülecektir.

procedure TFrmAna.Button1Click(Sender: TObject);
begin
 Application.CreateForm(TFrmIsTalepListForm,FrmIsTalepListForm);
 FrmIsTalepListForm.dbedtKimlik.DataSource := dm.DataSource1; //yeni eklenen
 FrmIsTalepListForm.dbedtKimlik.DataField := 'Kimlik'; //yeni eklenen
 FrmIsTalepListForm.ShowModal;
end;

Açılacak olan formda tanımlı olan DataSource ve DataField atamalarını properties alanında silmeniz gerekiyor. 
Veritabanı bağlantısı sağlanmayınca otomatik olarak sorun ortadan kalkıyor. Bu şekilde sıralı şekilde işlem görmektedir.
İyi çalışmalar.
kisisel_logo_dark.png
WWW
Cevapla
#14
@Halil Han BADEM in de bahsettiği gibi veritabanı bağlantısı olmadığında problem ortadan kalkıyor. Problemin nedenine dair bir fikrim yok ama alternatif çözüm olarak şu şekilde bir düzenleme yapabilirsiniz.



procedure TFrmIsTalepListForm.dbedtKimlikChange(Sender: TObject);
begin
 inherited;

 if (FrmIsTalepListForm.Showing) then // onChange olayının çalışma şartına formun gösteriliyor olma şartı ekleniyor.
 begin
   ShowMessage('On Edit Change');
   if Assigned(MyDataset)  then ShowMessage('MyDataset Var') else ShowMessage('MyDataset Yok') ;
  ShowMessage(dm.ADOQuery1.FieldByName('Kimlik').AsString);
 end;

end;
Cevapla
#15
Üstadlarım hepinize teşekkürler.@frmman sanırım yönteminiz en prtik olan çözüm yöntemi ancak durum tuhaf değil mi?
Cevapla
#16
(19-10-2019, Saat: 11:16)LastCoder Adlı Kullanıcıdan Alıntı: Üstadlarım hepinize teşekkürler.@frmman  sanırım yönteminiz en prtik olan çözüm yöntemi ancak durum tuhaf değil mi?

ilk sayfada yazdığım mesajdaki yöntemi denediniz mi? denediyseniz sonucu ne oldu? denemediyseniz neden denemediniz?
Cevapla
#17
(20-10-2019, Saat: 12:15)sddk Adlı Kullanıcıdan Alıntı:
(19-10-2019, Saat: 11:16)LastCoder Adlı Kullanıcıdan Alıntı: Üstadlarım hepinize teşekkürler.@frmman  sanırım yönteminiz en prtik olan çözüm yöntemi ancak durum tuhaf değil mi?

ilk sayfada yazdığım mesajdaki yöntemi denediniz mi? denediyseniz sonucu ne oldu? denemediyseniz neden denemediniz?

Normalde zaten kullandığım bir syntax.Buraya yazmadan önce ilk baştan kullanıp denemiştim zaten o yüzden yazmadım.
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  4 İşlem - PDF Çalışma Sayfası Hazırlama Frrst 0 223 25-08-2023, Saat: 09:58
Son Yorum: Frrst
Sad Tabsheet içinde Form Create, Close olayları YILDIRIMBEY 0 220 24-08-2023, Saat: 17:26
Son Yorum: YILDIRIMBEY
  mdi child form sorunu goabdullah 3 3.139 20-03-2023, Saat: 21:37
Son Yorum: CesuR
Question MdiChild Form İçin Create Helper? YILDIRIMBEY 1 593 10-10-2022, Saat: 10:53
Son Yorum: YILDIRIMBEY
  XML Json dosyaları ile Çalışma masteryoda 10 8.690 10-08-2022, Saat: 23:21
Son Yorum: varyemez



Konuyu Okuyanlar: 1 Ziyaretçi