Çalışmayı Durdurdu Hatası (Missing data provider or data packet )(Çözüldü)

[yhackup]

Merhaba benim uygulama benden başka diğer bilgisayarlarda bu hatayı dönmeye başladı.





ShowMessage bile vermeden bu hataya düşüyor sebeb ne olabilir ki ?

procedure TForm10.FormCreate(Sender: TObject);
var
 i: integer;
 t: tstringlist;
begin
ShowMessage('321321321');

 Caption := Caption + Form1.GetBuildInfoAsString;
 if fileexists(ChangeFileExt(Application.ExeName, '.inf')) then

[ozcanm]

(30-06-2017, Saat: 15:30)yhackup Adlı Kullanıcıdan Alıntı: Merhaba benim uygulama benden başka diğer bilgisayarlarda bu hatayı dönmeye başladı.





ShowMessage bile vermeden bu hataya düşüyor sebeb ne olabilir ki ?

procedure TForm10.FormCreate(Sender: TObject);
var
 i: integer;
 t: tstringlist;
begin
ShowMessage('321321321');

 Caption := Caption + Form1.GetBuildInfoAsString;
 if fileexists(ChangeFileExt(Application.ExeName, '.inf')) then

Merhaba,
Kodu yazdığınız Formunuz, Form10 olarak gözüküyor. kontrol etmediyseniz formların açılış sırasını bir kontrol edin.

[yhackup]

Sıkıntı yok. ve benim bilgisayarda sorunsuz.
Ortak bir ağa atıyorum , aynı uygulamayı ben ağdan açıyorum yine problem yok onlar ağdan açıyor hata veriyor.

---

Hatanın sebebini bulduk
ClientDataSet1'ten dolayı imiş form üzerine atıp active true olarak bırakılınca sorun çıkarıyor bazı bilgisayarlarda.

Form create ederken ClientDataSet1.Active := true; yapıyorum, ClientDataSet1: Missing data provider or data packet hatası aldım bu sefer de ?

ilk defa kullanıyorum bir püf noktası var mıdır ?

[yhackup]

bunu da çözdüm
İnternette bu sorunun çözümü hiç bir yerde yok maalesef çok şaşırdım.
ClientDataSet1 componeti form üzerinde iken Active False yapıldığında eklediğiniz fieldlerden oluşan dataseti siliniyor.
Form create aşamasında

ClientDataSet1.Active := true;  

  demeden önce tekrardan

ClientDataSet1.CreateDataSet;  

  ile dataset oluşturtmamız gerekiyor.