Реферат Файловий менеджер

ask; (PathCharTo, Path.c_str ());// Преобрзованіе AnsiString в char (PathCharTo, LEFT);

}}}. cpp

# include lt; vcl.h gt;

# pragma hdrstop

# include Unit2.h

# include Unit3.h

# pragma package (smart_init)

# pragma resource *. dfm * FormDialogCreateDir;

__ fastcall TFormDialogCreateDir :: TFormDialogCreateDir (TComponent * Owner)

: TForm (Owner)

{} __ fastcall TFormDialogCreateDir :: bCancelClick (TObject * Sender)

{gt;edNewDirName-gt;Text=laquo;raquo;;gt;edNewDirName-gt;SetFocus();gt;Hide();

} __ fastcall TFormDialogCreateDir :: bOkClick (TObject * Sender)

{Result=CreateFolder (Panel); gt; edNewDirName- gt; SetFocus (); (Result == true)

{ gt; edNewDirName- gt; Text= raquo ;; gt; Hide ();

}} __ fastcall TFormDialogCreateDir :: edNewDirNameKeyDown (TObject * Sender, amp; Key, TShiftState Shift)

{bool Result; (Key)

{case 13: Result=CreateFolder (Panel); gt; edNewDirName- gt; SetFocus (); (Result == true)

{ gt; edNewDirName- gt; Text= raquo ;; gt; Hide ();

}; 27: FormDialogCreateDir-gt;edNewDirName-gt;Text=laquo;raquo;;gt;edNewDirName-gt;SetFocus();gt;Hide();;

}

}. cpp

# include lt; vcl.h gt;

# pragma hdrstop

# include Unit4.h

# pragma package (smart_init)

# pragma resource *. dfm * FormDialogDelete;

# include Unit2.h

__ fastcall TFormDialogDelete :: TFormDialogDelete (TComponent * Owner)

: TForm (Owner)

{

} __ fastcall TFormDialogDelete :: bCancelClick (TObject * Sender)

{ gt; bRecycler- gt; SetFocus (); gt; Hide ();

} __ fastcall TFormDialogDelete :: bDeleteClick (TObject * Sender)

{(Panel, FO_DELETE); gt; bRecycler- gt; SetFocus (); gt; Hide ();

} __ fastcall TFormDialogDelete :: bRecyclerClick (TObject * Sender)

{(Panel, FO_DELETER); gt; bRecycler- gt; SetFocus (); gt; Hide ();

}