TCodeEditダウンロード - TCodeEditソースコードのダウンロード

TCodeEdit

Delphi のソースコード

version to 0.7.0

ダウンロード

TCodeEdit

軽量で構文が強調表示された UNICODE エディター。
UNICODE エンコーディングを使用した、構文が強調表示されたコンパクトなコードエディター。

なぜここにあるのか

TCodeEdit Pascal および lysee コードを編集するための私の lysee プロジェクトのコンポーネントであり、他の開発言語に合わせて拡張するのが簡単です。全体として、 TCodeEdit小さく、シンプルで使いやすく、他のプログラマーにとっても役立つ可能性があります。ここのオープンソースに入れておきます。
TCodeEdit元々、私の Lysee プロジェクト用の Pascal/Lysee コードエディターとして開発されましたが、その後、他のプログラミング言語を編集するために簡単に拡張できることがわかりました。全体として、 TCodeEditは小さく、シンプルで、使いやすく、他のプログラマにとっても役立つ可能性があるため、誰でも使用できるオープンソースコードとしてここに置きます。

開発状況

TCodeEdit開発中のため、便利な機能がいくつかありません。
TCodeEditまだ開発と改善が行われており、基本的な構文強調編集機能に加えて、他のいくつかの補助機能がまだ追加されていません。

印刷してプレビューします。
コードを HTML に変換します (コードを HTML エンコーディングに変換します)。
ブックマーク（ブックマーク、Ctrl + 数字キーを押すとジャンプする種類）。
オートコンプリート (コード支援補完)。
その他の言語構文 (その他のプログラミング言語構文) - ....

ライセンス

TCodeEdit MIT ライセンスに基づいてリリースされましたので、そのままお使いください。
TCodeEdit MITライセンスを使用しているので安心してご利用いただけます。

バージョン

おそらく 60% が完了したところなので、現在のバージョンは 0.6.0 です。
おそらく 60% しか完成していないので、バージョンは暫定的に 0.6.0 です。

使い方。

TCodeEdit入手して、Lazarus/Delphi プロジェクトに追加します。
TCodeEditダウンロードして、開発プロジェクトに追加します。
フォームユニットで codeedit.pas を使用し、 TCodeEdit保持するクラスフィールドを宣言します。
TCodeEdit使用してクラスメンバー変数を宣言する必要があるウィンドウユニットに codeedit.pas を追加します。
TCodeEdit; procedure EditStatus(Sender: TObject); end;">
```
 uses codeedit;

type
  TMainForm = class (TForm)
  private
    FEdit: TCodeEdit ;
    procedure EditStatus (Sender: TObject);
  end ;
```
PlaceACodeEdit() を呼び出して、必要な場所にTCodeEdit配置します。
PlaceACodeEdit 関数を呼び出して、必要な場所にTCodeEdit配置します。
```
 procedure TMainForm.FormCreate (Sender: TObject);
begin
  FEdit := PlaceACodeEdit(Self);
  FEdit.OnStatus := @EditStatus;
end ;
```

OnStatus イベントに応答してエディターのステータスを表示し、メニューまたはボタンを有効/無効にします。
OnStatus イベントに応答してエディターのステータスを表示し、関連するメニュー、ボタン、その他のコンポーネントのプロパティを変更します。

 procedure TMainForm.EditStatus (Sender: TObject);
begin
  EditUndoMenu.Enabled := (FEdit.Undos.Last <> nil );
  EditRedoMenu.Enabled := (FEdit.Redos.Last <> nil );
  EditCutMenu.Enabled := FEdit.Selection.Selected;
  EditCopyMenu.Enabled := FEdit.Selection.Selected;
  EditPasteMenu.Enabled := HasTextFormat;
  StatusBar.Panels[ 0 ].Text := Format( ' %d, %d ' , [FEdit.Caret.LineIndex + 1 , FEdit.Caret.TextIndex]);
  if FEdit.Modified then
    StatusBar.Panels[ 1 ].Text := ' Changed ' else
    StatusBar.Panels[ 1 ].Text := ' ' ;
  StatusBar.Panels[ 2 ].Text := FEdit.Syntax.Language;
end ;

ファイルを開く方法。
ファイルを開く方法。
```
 procedure TMainForm.FileOpenMenuClick (Sender: TObject);
begin
  CloseDialogs;
  if OpenDialog.Execute then
    FEdit.Lines.LoadFromFile(OpenDialog.FileName);
end ;
```
ファイル拡張子に基づいて、 TCodeEdit優先言語構文を自動的に選択します。
ファイルを開いた後、 TCodeEditファイルの接尾辞に基づいて、一致する構文強調表示クラスを自動的に選択します。

構文クラスを手動で使用する方法。
構文強調表示クラスを手動で設定する方法。

FEdit.Syntax.SyntaxClass := TPascalSyntax;
FEdit.Syntax.SyntaxClass := FindSyntax( ' Pascal ' );
FEdit.Syntax.SyntaxClass := FindSyntaxByFileExt( ' .pas ' );
FEdit.Syntax.SyntaxClass := FindFileSyntax( ' ~/editor/frmmain.pas ' );

拡大する

追加情報