view/CopalPro/Base.h

//---------------------------------------------------------------------------
// フロート可能なフォームの基本クラス
//---------------------------------------------------------------------------
#ifndef BaseH
#define BaseH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TFBase : public TForm {
__published:    // IDE 管理のコンポーネント

private:        // ユーザー宣言

protected:

  AnsiString FindWord; //検索文字列
  AnsiString CurrentDir;

public:         // ユーザー宣言

  virtual void Copy() = 0;
  virtual void Paste() = 0;
  virtual void Cut() = 0;

  virtual void Undo(void) {};
  virtual void Redo(void) {};
  virtual bool CanUndo(void) {
    return false;
  };
  virtual bool CanRedo(void) {
    return false;
  };
  virtual AnsiString GetCaretString(void)=0;

  virtual AnsiString GetMyCurrentDir(void) {
    return CurrentDir;
  };

  void SetMyCurrentDir(AnsiString dir) {
    CurrentDir = dir;
    SetCurrentDir(CurrentDir);
  };

  virtual void SetWindowFocus(void) {};

  virtual void Save(void) {};

  virtual void SaveAs(void) {};

  virtual void Find(void) {};
  virtual void FindNext(void) {};
  virtual void FindPrev(void) {};
  virtual void __fastcall OnFind(TObject *Sender) {};

  __fastcall TFBase(TComponent* Owner);

};
//---------------------------------------------------------------------------
extern PACKAGE TFBase *FBase;
//---------------------------------------------------------------------------
#endif