Değişkendeki değer kayboluyor

[m_ekici]

Merhaba arkadaşlar.

Çalışan bir projeden yeni bir proje oluşturdum. 1 Ana Form ve TDataModule u bırakarak diğerler formları sildim. Proje çalıştığında TDataModule önce oluşturuluyor, sonra AnaForm oluşturuluyor. AnaForm un OnCreate procedurunde bilgisayarın adını alıyor ve TDataModule un public bölümünde tanımlı TerminalAdi değişkenine aktarıyorum. debug yaptığımda değişken içerisinde aktarılan bilgisayar adı görünüyor. OnCreate paragrafının sonunda Timer çalıştırılıyor. OnTimer paragrafına geçtiğinde TDataModule.TerminalAdi boş geliyor. Aynı kod eski projede çalışıyor. Bu neden olur?

İyi çalışmalar

[freeman35]

creation order kontrolü yap bence, ayrıca timer ı on create yerine on showda active et. Neden timer içerisinde sürekli bilgisayar adını aldırtıyorsun? bunu bir function a çevir ve sadece gerektiğinde aldırtmak, gereksiz işlemci yükü vermemiş olursun.

[m_ekici]

tşk.
Timer içerisinde sürekli bilgisayar adını almıyorum. Oncreate de 1 defa alıp TDataModule deki (public) değişkene aktarıyorum. Oncreate in sonunda (değişkene bilgisayar adını aktardıktan sonra) timer aktif oluyor. İhtiyaç duyduğumda TDataModule deki değişkenden bilgisayar adını kullanıyorum. Sıkıntı değişkene aktardıktan sonra neden sıfırlanıyor. (debug da aktarılan değer görünüyor)?

Ayrıca Onshowda timer i aktifleştirirsem timer içerisinde formu kapatmak zorunda kaldığımda (AnaForm.Onshow tamamlanmadığından) AnaForm.Close de hata oluşuyor.

[csunguray]

Bence farkında olmadan TDataModule'un farklı bir instance ını daha oluşturuyorsun. Başlangıçla daha sonraki DataModule1 değişkeninin adres değerini karşılaştır.