12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394 |
- //----------------------------------------------------------------------------
- #ifndef ConsoleH
- #define ConsoleH
- //----------------------------------------------------------------------------
- #include "HistoryComboBox.hpp"
- #include "PathLabel.hpp"
- #include <System.Classes.hpp>
- #include <Vcl.ActnList.hpp>
- #include <Vcl.Controls.hpp>
- #include <Vcl.ExtCtrls.hpp>
- #include <Vcl.ImgList.hpp>
- #include <Vcl.Menus.hpp>
- #include <Vcl.StdActns.hpp>
- #include <Vcl.StdCtrls.hpp>
- //----------------------------------------------------------------------------
- #include "WinInterface.h"
- #include <Terminal.h>
- #include "PngImageList.hpp"
- #include <Vcl.Imaging.pngimage.hpp>
- #include <System.Actions.hpp>
- #include <GUITools.h>
- #include <System.ImageList.hpp>
- //----------------------------------------------------------------------------
- class TConsoleDialog : public TForm
- {
- __published:
- TMemo *OutputMemo;
- TBevel *Bevel1;
- TLabel *Label1;
- TLabel *Label2;
- TLabel *Label4;
- TButton *CancelBtn;
- THistoryComboBox *CommandEdit;
- TButton *ExecuteButton;
- TPathLabel *DirectoryLabel;
- TButton *HelpButton;
- TPngImageList *Images;
- TPopupMenu *PopupMenu;
- TMenuItem *SelectAllItem;
- TMenuItem *CopyItem;
- TMenuItem *N1;
- TMenuItem *AdjustWindowItem;
- TActionList *ActionList;
- TEditCopy *EditCopy;
- TEditSelectAll *EditSelectAll;
- TAction *AdjustWindow;
- TImage *Image;
- TPngImageList *Images120;
- TPngImageList *Images144;
- TPngImageList *Images192;
- void __fastcall ExecuteButtonClick(TObject *Sender);
- void __fastcall CommandEditChange(TObject *Sender);
- void __fastcall HelpButtonClick(TObject *Sender);
- void __fastcall ActionListExecute(TBasicAction *Action, bool &Handled);
- void __fastcall ActionListUpdate(TBasicAction *Action, bool &Handled);
- void __fastcall FormShow(TObject *Sender);
- void __fastcall OutputMemoContextPopup(TObject *Sender, TPoint &MousePos,
- bool &Handled);
- void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
- private:
- TTerminal * FTerminal;
- TTerminal * FLastTerminal;
- TNotifyEvent FOldChangeDirectory;
- TNotifyEvent FPrevTerminalClose;
- TRect FAutoBounds;
- bool FClearExceptionOnFail;
- bool FDirectoryChanged;
- bool FExecuting;
- void __fastcall DoExecuteCommand();
- void __fastcall ExecuteCommand();
- void __fastcall SetTerminal(TTerminal * value);
- void __fastcall TerminalClose(TObject * Sender);
- void __fastcall AddLine(const UnicodeString & Line, TCaptureOutputType OutputType);
- protected:
- void __fastcall DoChangeDirectory(TObject * Sender);
- void __fastcall UpdateControls();
- virtual void __fastcall CreateParams(TCreateParams & Params);
- virtual void __fastcall Dispatch(void * Message);
- void __fastcall DoAdjustWindow();
- INTERFACE_HOOK
- public:
- virtual __fastcall ~TConsoleDialog();
- virtual __fastcall TConsoleDialog(TComponent* AOwner);
- bool __fastcall Execute(const UnicodeString Command = L"",
- const TStrings * Log = NULL);
- __property TTerminal * Terminal = { read = FTerminal, write = SetTerminal };
- };
- //----------------------------------------------------------------------------
- #endif
|