Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

Gönderen Konu: Delphide formun durumunu kontrol etmek  (Okunma sayısı 330 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı kirve

  • Delphi 2 Level 5
  • *****
  • İleti: 91
  • Rep: +1/-0
Delphide formun durumunu kontrol etmek
« : 04 Şubat 2012 03:10:32 »
arkadaslar delphide formnun durumunu nasıl kontrol edebilirim
yani soyle eger form var ise yok et yoksa es gec.

Çevrimdışı tawer1

  • Delphi 7 Level 4
  • ****
  • İleti: 333
  • Rep: +0/-0
  • Cinsiyet: Bay
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #1 : 04 Şubat 2012 09:15:59 »
try
kodların
except
eger yoksa komutların
end;

try
except
end; blogunu biraz arastır anlarsın saten
Seo yapılandırma servisi

Çevrimdışı cakirr42

  • Administrator
  • *****
  • İleti: 1.069
  • Rep: +5/-0
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • Ahmet Kürşat ÇAKIR
  • Delphi Sürümü: XE, XE2
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #2 : 04 Şubat 2012 10:36:40 »
arkadaşın demeye çalıştığı anladığım kadarıyla ;
//Form1==> Formunun adı
if Form1<> Nil then
  Form1.Destroy;
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı tawer1

  • Delphi 7 Level 4
  • ****
  • İleti: 333
  • Rep: +0/-0
  • Cinsiyet: Bay
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #3 : 04 Şubat 2012 10:56:11 »
hımm mantıklı :D
Seo yapılandırma servisi

Çevrimdışı cakirr42

  • Administrator
  • *****
  • İleti: 1.069
  • Rep: +5/-0
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • Ahmet Kürşat ÇAKIR
  • Delphi Sürümü: XE, XE2
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #4 : 04 Şubat 2012 11:04:22 »
aslında direk Form1.Free; de denebilir :)
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı barutali

  • Administrator
  • *****
  • İleti: 2.228
  • Rep: +54/-0
  • Cinsiyet: Bay
  • Falan filan ...
  • Delphi Sürümü: 2010 - XE2
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #5 : 04 Şubat 2012 11:10:03 »
Neden

Kod:  (Unknown Language)
  1. if Form1<> Nil then
  2.   Form1.Destroy;
  3.  

yazdın?



Amatör Küme Programcı

Çevrimdışı cakirr42

  • Administrator
  • *****
  • İleti: 1.069
  • Rep: +5/-0
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • Ahmet Kürşat ÇAKIR
  • Delphi Sürümü: XE, XE2
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #6 : 04 Şubat 2012 11:14:43 »
nesne yoksa "Nil" dönmesi gerekmezmi  ::)
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı barutali

  • Administrator
  • *****
  • İleti: 2.228
  • Rep: +54/-0
  • Cinsiyet: Bay
  • Falan filan ...
  • Delphi Sürümü: 2010 - XE2
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #7 : 04 Şubat 2012 12:22:40 »
ben o anlamda sormadım :D Bir kaç gün öncenin msn kayıtlarına bak



Amatör Küme Programcı

Çevrimdışı cakirr42

  • Administrator
  • *****
  • İleti: 1.069
  • Rep: +5/-0
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • Ahmet Kürşat ÇAKIR
  • Delphi Sürümü: XE, XE2
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #8 : 04 Şubat 2012 13:01:34 »
hee :D :D tamam anladım ki ben onu :)
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı omurolmez

  • Delphi 4 Level 3
  • ***
  • İleti: 177
  • Rep: +0/-0
  • Cinsiyet: Bay
  • Delphi Sürümü: Delphi 6
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #9 : 09 Şubat 2012 14:10:04 »
!!! DİKKAT AŞAĞIDAKİ DÖRT SATIR HATALIDIR VE ÇOK BAŞ AĞRITIR !!!

Kod:  (Unknown Language)
  1. if Form1<>nil then
  2.   Form1.Destroy;
  3.  
  4. if Form1<>nil then
  5.   Form1.Free;
  6.  
  7. if Assigned(Form1) then
  8.   Form1.Destroy;
  9.  
  10. if Assigned(Form1) then
  11.   Form1.Free;


Daha sonradan geçerliliğini kontrol edeceğiniz tüm nesne referanslarına, geçersiz hale getirirseniz nil ekleyin.
Yani, if a = nil if a <> nil vb kontrol yapacaksanız ve a.Destroy veya a.Free çağırıyorsanız a :=nil atamsı yapın.
Eğer bunu yapmazsanız, bilgisayarın o anki durumuna göre farklı sonuçlar alırsınız. Örneğin, evde deneyip problemsiz çalıştırdığınız programınız müşterinizde abuk sabuk hatalar verebilir.

Doğru kod şudur:,

Kod:  (Unknown Language)
  1. if Assigned(Form1) then
  2.   FreeAndNil(Form1);
Ömür Ölmez

Çevrimdışı cakirr42

  • Administrator
  • *****
  • İleti: 1.069
  • Rep: +5/-0
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • Ahmet Kürşat ÇAKIR
  • Delphi Sürümü: XE, XE2
Ynt: Delphide formun durumunu kontrol etmek
« Yanıtla #10 : 09 Şubat 2012 16:00:33 »
doğru olan, formun onDestroy olayında Form1:=Nil; demektir (benim kişisel görüşüm.)

sonrasında ise assigned() komutunu ben kullanıyorum, bellek israfı.!
if Form1 <> nil then
  Form1.Destroy;
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"