خطای cannot make visible window modal

[paladin]

این کد رو در Delphi 7 و 2009 خطا میده
s :=self.ShowModal;
خطا نیز این هست :
cannot make visible window modal
البته همانطور که پیداست ما نکی خواهیم که متد showmodalرو فراخوانی کنیم .

[Felony]

وقتی فرمی در حال نمایش هست نمیتونید اون رو به صورت عادی ShowModal کنید ، ساده ترین راه این هست که چک کنید اگر در حال نمایش بود مخفیش کنید و دوباره به صورت ShowModal نمایشش بدید :

if Self.Showing then
Self.Hide;
Self.ShowModal;