view/CopalPro/Script.h

//---------------------------------------------------------------------------
#ifndef ScriptH
#define ScriptH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <vcl\clipbrd.hpp>
//---------------------------------------------------------------------------
#include "Base.h"
#include "KCodeconv.h"
#include <Dialogs.hpp>


class KCopalConfig;
//---------------------------------------------------------------------------
class TFScript : public TFBase {
__published:    // IDE 管理のコンポーネント
  TRichEdit *REScript;
        TOpenDialog *OpenDialog;
  void __fastcall FormActivate(TObject *Sender);
  void __fastcall REScriptChange(TObject *Sender);
  void __fastcall REScriptMouseDown(TObject *Sender,
                                    TMouseButton Button, TShiftState Shift, int X, int Y);
  void __fastcall REScriptKeyUp(TObject *Sender, WORD &Key,
                                TShiftState Shift);
  void __fastcall REScriptMouseUp(TObject *Sender,
                                  TMouseButton Button, TShiftState Shift, int X, int Y);
private:        // ユーザー宣言

  int Delimiter;//改行コード
  int Code;//文字コード
  int FileDate;
  bool Modified;//変更したかどうか
  AnsiString FileName;//ファイル名
  TSearchTypes SearchOption;
  KCopalConfig *CopalConfig;

public:         // ユーザー宣言


  void SetCopalConfig(KCopalConfig *c) {
    CopalConfig = c;
  };

  AnsiString GetFileName(void) {
    return FileName;
  };

  //---------------------------------------------------------------------------
  void SetWindowFocus(void);
  AnsiString GetCaptionStr(void);

  //---------------------------------------------------------------------------
  // 編集
  //---------------------------------------------------------------------------
  void Undo(void);
  bool CanUndo(void) {
    return REScript->Perform(EM_CANUNDO,0,0);
  };

  void SetReadOnly(bool b) {
    REScript->ReadOnly = b;
  };

  //---------------------------------------------------------------------------
  //検索関連
  //---------------------------------------------------------------------------
  void Find(void);
  void FindNext(void);
  void FindPrev(void);
  void MakeCursorVisible(void);
  void __fastcall OnFind(TObject *Sender);

  //---------------------------------------------------------------------------
  // クリップボード
  //---------------------------------------------------------------------------
  void Cut(void);
  void Copy(void);
  void Paste(void);
  //---------------------------------------------------------------------------
  bool SaveQuery(void);
  void Save(void);
  void SaveAs(void);
  void Load(void);
  void New(void);
  //---------------------------------------------------------------------------
  AnsiString GetCaretString(void);
  AnsiString GetHelpKeyWord(void);
  void CheckFileDate(void);

  void LineJump(int line);//行ジャンプ
  bool ExecuteEditor(void);

  void SaveToTemporaryFile(AnsiString FileName);//スクリプトの保存
  void SaveToFile(AnsiString FileName);//スクリプトの保存
  void LoadFromFile(AnsiString FileName);//スクリプトを開く
  void Reload(void) {
    LoadFromFile(FileName);
  };

  void SetTabWidth(KCopalConfig *,int tabwidth);

  //---
  // 漢字コード関連
  //---
  int GetDelimiter(void) {
    return Delimiter;
  };
  int GetCode(void) {
    return Code;
  };
  void SetCode(int mode);

  __fastcall TFScript(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFScript *FScript;
//---------------------------------------------------------------------------
#endif