FileFrm1 File Creation Form1* Frame1 File Function Text1 title File: FUnique FOpen FCreate FClose FDelete Frame2 File Status Label1 Status: Label2 Size: Label3 Handle: Label4 Error Code: FHandle FErrc OldNdx FOpt_Click Index FClose ffunique text1 FFCreate FFOpen Ffclose retc/ FDelete UpdateStatus FUnique FCreat FOpen Caption lret] FSizeHs lretc Form_Load Form_Paint ConvexFrm FileFrm1 ConvexCtl Frame1 Frame2F FOpt_Click close any file we have open TEST.DOC TEST.DOC TEST.DOC Do you really want do delete " Warning" ffunique FFCreate FFOpen UpdateStatus Closed Ffclose Form_Load Form_Paint