TCodeEdit

TCodeEdit

Um editor UNICODE leve e com sintaxe destacada.
Um editor de código compacto com destaque de sintaxe usando codificação UNICODE.

por que está aqui

TCodeEdit é um componente do meu projeto lysee para edição de códigos pascal e lysee, e é fácil de ser estendido para caber em outras linguagens de desenvolvimento. No geral, TCodeEdit é pequeno, simples, fácil de usar e pode ser útil para outros codificadores, portanto. Eu coloquei aqui código aberto.
TCodeEdit foi originalmente desenvolvido como um editor de código Pascal/Lysee para meu projeto Lysee, e mais tarde descobri que pode ser facilmente estendido para edição de outras linguagens de programação. No geral, TCodeEdit é pequeno, simples e fácil de usar e pode ser útil para outros programadores, por isso o coloquei aqui como um código-fonte aberto para uso de todos.

Status em desenvolvimento

TCodeEdit está em desenvolvimento e carece de algumas funções úteis.
TCodeEdit ainda está em desenvolvimento e aprimoramento. Além da função básica de edição de realce de sintaxe, algumas outras funções auxiliares ainda precisam ser adicionadas:

• imprimir e visualizar.
• converter código em HTML (converter código em codificação HTML).
• marcador (marcador, do tipo que salta pressionando Ctrl + teclas numéricas).
• preenchimento automático (conclusão assistida por código).
• mais sintaxe de linguagem (mais sintaxe de linguagem de programação) - ....

Licença

TCodeEdit foi lançado sob a licença do MIT. Basta usá-lo como quiser.
TCodeEdit usa a licença MIT e pode ser usado com confiança.

Versão

Talvez tenha acabado de completar 60%, então a versão atual é 0.6.0.
Talvez esteja apenas 60% completo, então a versão é provisoriamente 0.6.0.

Como usá-lo.

1. Obtenha TCodeEdit e adicione-o ao seu projeto Lazarus/Delphi.
   Baixe TCodeEdit e adicione-o ao seu projeto de desenvolvimento.
   

2. Use codeedit.pas em sua unidade de formulário e declare o campo de classe para armazenar TCodeEdit
   Adicione codeedit.pas à unidade de janela que precisa usar TCodeEdit e declarar variáveis ​​de membro de classe.
   

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

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

3. Coloque um TCodeEdit onde desejar chamando PlaceACodeEdit().
   Chame a função PlaceACodeEdit para colocar TCodeEdit no local necessário.
   

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

4. Responde ao evento OnStatus para exibir o status do editor e ativar/desativar menus ou botões.
   Responda ao evento OnStatus para exibir o status do editor e modificar as propriedades de menus, botões e outros componentes relacionados.
   

    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. Como abrir um arquivo.
   Como abrir um arquivo.
   

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

   Com base na extensão do arquivo, TCodeEdit escolherá automaticamente a sintaxe do idioma preferido.
   Depois de abrir o arquivo, TCodeEdit seleciona automaticamente a classe de realce de sintaxe correspondente com base no sufixo do arquivo.

6. Como usar a classe de sintaxe manualmente.
   Como definir manualmente as classes de realce de sintaxe.
   

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