-Control 'TabSheet1' has no parent window- hatası

[ruso]

Merhaba.
programımda "Code: 1400. Geçersiz Pencere İşleci" şeklinde bir hata alıyorum.
ardından,
"Control 'Tabsheet1' has no parent Window" şeklinde bir hata alıyorum. daha önce karşılaşan arkadaşlar varsa, nasıl çözebilirim veya sorun nerden kaynaklanıyor olabilir?
Yardımlarınız ve fikirleriniz için teşekkür ederim...

[cemaliozan]

Aslında sorusu açık olmayan ve kod yazmayan arkadaşlara cevap vermemeyi düşünüyorumdum. Sizin soruda çok açık değil ama anladığın yönüyle şimdilik bir istisna yapıyorum...

TabSheet leri RUNTIME çalışırken dinamik olarak mı oluşturuyorsunuz ? Eğer böyleyse pencere denetimlerinin bir owner (sahibi), birde parent (konteynır/taşıyıcı) olması gerektiğini söylüyor kodunuz. Örneği inceleyin....

PHP Kodu:

procedure TForm1.Button1Click(Sender: TObject);
  var ts:Ttabsheet;
begin
   TS := TTabSheet.Create(self);
   ts.PageControl:=pagecontrol1;
  with tmemo.Create(TS) do
  begin
     Align := albottom;
     Text := '';
     Parent := TS;
     ts.caption:='asdasd';
    end;
end; 


[Caylaq]

Formlarınızı manuel mi oluşturuyorsunuz yoksa AutoCreate mi ?


.

[Caylaq]

http://dn.codegear.com/article/32047




.

[ruso]

ilginiz için teşekkür ederim. TMS component kullanıyorum. form'un onClose olayında thread'i sonlandırınca bu hatayı veriyor.

TerminateThread(Thread1,0);

kodları takip ettiğimde komponentin içindeki kodlarda hatayı veriyor. ama neden olduğunu anlayamadım.

[Caylaq]

Şu olabilir mi ?

TAbda setfocus varsa ve tab aktif değilse bu hatayı verebilir mi ?

Yani önce tab gösterilecek, sonra focus yapılacak


.

[cemaliozan]

ruso, mesajından alıntı:

TerminateThread(Thread1,0);
kodları takip ettiğimde komponentin içindeki kodlarda hatayı veriyor. ama neden olduğunu anlayamadım.

Kanal kullanıyorsun... Kanal içinde nesneleri yoketmek veya owner'ı yokedilerek otomatik olarak free edilen nesnelere erişmeye filan çalışıyor olabilirsin. Kanal sınıfının ve yöntemlerinin kodunu görmemiz gerekir...