TCodeEdit

TCodeEdit

Editor UNICODE yang ringan dan sintaksis disorot.
Editor kode ringkas dengan highlight sintaksis menggunakan pengkodean UNICODE.

mengapa itu ada di sini

TCodeEdit adalah komponen proyek lysee saya untuk mengedit kode pascal dan lysee, dan mudah untuk diperluas agar sesuai dengan bahasa berkembang lainnya. Secara keseluruhan, TCodeEdit kecil, sederhana, mudah digunakan dan mungkin berguna bagi pembuat kode lain Saya menaruhnya di sini open source.
TCodeEdit awalnya dikembangkan sebagai editor kode Pascal/Lysee untuk proyek Lysee saya, dan kemudian saya menemukan bahwa ini dapat dengan mudah diperluas untuk mengedit bahasa pemrograman lain. Secara keseluruhan, TCodeEdit kecil, sederhana, dan mudah digunakan, dan mungkin berguna bagi pemrogram lain, jadi saya meletakkannya di sini sebagai kode sumber terbuka untuk digunakan semua orang.

Status berkembang

TCodeEdit sedang dalam pengembangan dan tidak memiliki beberapa fungsi yang berguna.
TCodeEdit masih dalam pengembangan dan penyempurnaan. Selain fungsi pengeditan penyorotan sintaksis dasar, beberapa fungsi tambahan lainnya belum ditambahkan:

• cetak dan pratinjau.
• mengkonversi kode ke HTML (mengonversi kode ke pengkodean HTML).
• bookmark (bookmark, jenis yang melompat dengan menekan tombol Ctrl + angka).
• pelengkapan otomatis (penyelesaian dengan bantuan kode).
• lebih banyak sintaks bahasa (lebih banyak sintaks bahasa pemrograman) - ....

Lisensi

TCodeEdit dirilis di bawah lisensi MIT. Gunakan saja sesuka Anda.
TCodeEdit menggunakan lisensi MIT dan dapat digunakan dengan percaya diri.

Versi

Mungkin baru menyelesaikan 60%, jadi versi saat ini adalah 0.6.0.
Mungkin baru 60% selesai, jadi versi tentatifnya 0.6.0.

Bagaimana cara menggunakannya.

1. Dapatkan TCodeEdit dan tambahkan ke proyek Lazarus/Delphi Anda.
   Unduh TCodeEdit dan tambahkan ke proyek pengembangan Anda.
   

2. Gunakan codeedit.pas di unit formulir Anda dan deklarasikan bidang kelas untuk menampung TCodeEdit
   Tambahkan codeedit.pas ke unit jendela yang perlu menggunakan TCodeEdit dan deklarasikan variabel anggota kelas.
   

   TCodeEdit; procedure EditStatus(Sender: TObject); end;">

    uses codeedit;
   
   type
     TMainForm = class (TForm)
     private
       FEdit: TCodeEdit ;
       procedure EditStatus (Sender: TObject);
     end ;

3. Tempatkan TCodeEdit di tempat yang Anda inginkan dengan memanggil PlaceACodeEdit().
   Panggil fungsi PlaceACodeEdit untuk menempatkan TCodeEdit di lokasi yang diperlukan.
   

    procedure TMainForm.FormCreate (Sender: TObject);
   begin
     FEdit := PlaceACodeEdit(Self);
     FEdit.OnStatus := @EditStatus;
   end ;

4. Menanggapi acara OnStatus untuk menampilkan status editor dan mengaktifkan/menonaktifkan menu atau tombol.
   Tanggapi acara OnStatus untuk menampilkan status editor dan mengubah properti menu, tombol, dan komponen terkait lainnya.
   

    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 ;

5. Cara membuka file.
   Cara membuka file.
   

    procedure TMainForm.FileOpenMenuClick (Sender: TObject);
   begin
     CloseDialogs;
     if OpenDialog.Execute then
       FEdit.Lines.LoadFromFile(OpenDialog.FileName);
   end ;

   Berdasarkan ekstensi file, TCodeEdit akan memilih sintaks bahasa pilihan secara otomatis.
   Setelah membuka file, TCodeEdit secara otomatis memilih kelas penyorotan sintaksis yang cocok berdasarkan akhiran file.

6. Cara menggunakan kelas sintaksis secara manual.
   Cara mengatur kelas penyorotan sintaksis secara manual.
   

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