Close Modal Olmaması

[Guest Huseyin]

Merhaba

Nedenini anlayamadığım için ve çok şey denediğim için buraya yazıyorum

procedure Tfrm_yazdir.UniBitBtn1Click(Sender: TObject);

begin

UniSession.AddJS('PrintMe('''+unihtmlframe1.JSName+'_id'')');

self.Destroy;

end;

 

ne close ne closemodal ne de self.destroy işe yaramıyor;

hatta bu butonun clickinden sonra showmodal kapanmıyor?

Neden olabilir?

[Guest Huseyin]

Çözdüm;

Self.webform.destroy ya da close demek gerekiyormuş hangisi işinize geliyorsa