//---------------------------------------------------------------------------- #ifndef ProgressH #define ProgressH //---------------------------------------------------------------------------- #include #include #include #include #include #include #include #include #include #include #include #include #include #include "HistoryComboBox.hpp" //---------------------------------------------------------------------------- class TProgressForm : public TForm { __published: TAnimate *Animate; TButton *CancelButton; TButton *MinimizeButton; TPanel *MainPanel; TLabel *Label1; TPathLabel *FileLabel; TLabel *TargetLabel; TPathLabel *TargetPathLabel; TProgressBar *OperationProgress; TPanel *TransferPanel; TLabel *Label3; TLabel *TimeElapsedLabel; TLabel *StartTimeLabelLabel; TLabel *StartTimeLabel; TLabel *Label4; TLabel *BytesTransferedLabel; TLabel *Label12; TLabel *CPSLabel; TProgressBar *FileProgress; TTimer *UpdateTimer; TPanel *SpeedPanel; TLabel *SpeedLabel2; TLabel *TimeLeftLabelLabel; TLabel *TimeLeftLabel; THistoryComboBox *SpeedCombo; TLabel *OnceDoneOperationLabel; TComboBox *OnceDoneOperationCombo; void __fastcall UpdateTimerTimer(TObject *Sender); void __fastcall FormShow(TObject *Sender); void __fastcall FormHide(TObject *Sender); void __fastcall CancelButtonClick(TObject *Sender); void __fastcall MinimizeButtonClick(TObject *Sender); void __fastcall SpeedComboExit(TObject *Sender); void __fastcall SpeedComboSelect(TObject *Sender); void __fastcall SpeedComboKeyPress(TObject *Sender, char &Key); void __fastcall OnceDoneOperationComboSelect(TObject *Sender); void __fastcall OnceDoneOperationComboCloseUp(TObject *Sender); private: TCancelStatus FCancel; TFileOperationProgressType FData; bool FDataReceived; TFileOperation FLastOperation; bool FLastTotalSizeSet; bool FMinimizedByMe; int FUpdateCounter; bool FAsciiTransferChanged; bool FResumeStatusChanged; void * FShowAsModalStorage; TDateTime FLastUpdate; bool FDeleteToRecycleBin; bool FReadOnly; unsigned long FCPSLimit; TOnceDoneOperation FOnceDoneOperation; void __fastcall SetOnceDoneOperation(TOnceDoneOperation value); void __fastcall SetAllowMinimize(bool value); bool __fastcall GetAllowMinimize(); void __fastcall SetReadOnly(bool value); void __fastcall GlobalMinimize(TObject * Sender); protected: void __fastcall CancelOperation(); void __fastcall MinimizeApp(); void __fastcall UpdateControls(); void __fastcall ApplyCPSLimit(); void __fastcall ResetOnceDoneOperation(); public: static AnsiString __fastcall OperationName(TFileOperation Operation); virtual __fastcall ~TProgressForm(); void __fastcall SetProgressData(TFileOperationProgressType & AData); virtual __fastcall TProgressForm(TComponent * AOwner); __property TCancelStatus Cancel = { read = FCancel }; __property TOnceDoneOperation OnceDoneOperation = { read=FOnceDoneOperation, write=SetOnceDoneOperation }; __property bool AllowMinimize = { read=GetAllowMinimize, write=SetAllowMinimize }; __property bool DeleteToRecycleBin = { read=FDeleteToRecycleBin, write=FDeleteToRecycleBin }; __property bool ReadOnly = { read=FReadOnly, write=SetReadOnly }; }; //---------------------------------------------------------------------------- #endif