我有10多個按鈕，每個按鈕均呼叫獨立的frame，現在當我點擊BitBtn2按鈕時，關閉BitBtn1按鈕呼叫的frame1。以此類推。。
無論我點擊那個按鈕，除這個按鈕呼叫的frame外，其他的frame均要求關閉，并釋放記憶體。
據說需要采用sendmessage(WM_CLOSE,0,0)方法關閉，比直接nil,free更好。
求高手指點，求完整代碼，我是小白，寫太簡單的話，我也看不懂。最好用D2010。
以下是我呼叫frame的代碼。
procedure TForm1.LoadFrameByClassName(FrameClassName:TMyFrame);
begin
if Assigned(Ffrm) and (not SameText(FrameClassName.ClassName, FCurrentfrmClass)) then
FreeAndNil(Ffrm); //sametext 判斷兩個字串是否相同，不區分大小寫 ,FreeAndnil釋放表單
Ffrm:=FrameClassName.Create(nil);
Ffrm.Parent:= Panel3;
FCurrentfrmClass :=FrameClassName.ClassName;
end;
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
self.LoadFrameByClassName(TIWFrame1) ;
end;
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/216192.html
標籤：語言基礎/算法/系統設計
下一篇：下載后Java檔案名亂碼