Ein schlanker und syntaxoptimierter UNICODE-Editor.
Ein kompakter Code-Editor mit hervorgehobener Syntax und UNICODE-Kodierung.
TCodeEdit ist eine Komponente meines Lysee-Projekts zum Bearbeiten von Pascal- und Lysee-Codes und lässt sich leicht erweitern, um es an andere Entwicklungssprachen anzupassen. Im Großen und Ganzen ist TCodeEdit klein, einfach, leicht zu verwenden und könnte daher für andere Programmierer nützlich sein Ich habe es hier als Open Source bereitgestellt.
TCodeEdit wurde ursprünglich als Pascal/Lysee-Codeeditor für mein Lysee-Projekt entwickelt und später stellte ich fest, dass es leicht für die Bearbeitung anderer Programmiersprachen erweitert werden kann. Insgesamt ist TCodeEdit klein, einfach und benutzerfreundlich und kann für andere Programmierer nützlich sein, daher stelle ich es hier als Open-Source-Code für jedermann zur Verfügung.
TCodeEdit befindet sich in der Entwicklung und es fehlen einige hilfreiche Funktionen.
TCodeEdit befindet sich noch in der Entwicklung und Verbesserung. Zusätzlich zur grundlegenden Syntaxhervorhebungsbearbeitungsfunktion müssen noch einige weitere Hilfsfunktionen hinzugefügt werden:
TCodeEdit wurde unter der MIT-Lizenz veröffentlicht. Verwenden Sie es einfach nach Belieben.
TCodeEdit verwendet die MIT-Lizenz und kann bedenkenlos verwendet werden.
Vielleicht sind gerade 60 % abgeschlossen, daher ist die aktuelle Version 0.6.0.
Vielleicht ist es nur zu 60 % fertig, also ist die Version vorläufig 0.6.0.
Holen Sie sich TCodeEdit und fügen Sie es Ihrem Lazarus/Delphi-Projekt hinzu.
Laden Sie TCodeEdit herunter und fügen Sie es Ihrem Entwicklungsprojekt hinzu.
Verwenden Sie codeedit.pas in Ihrer Formulareinheit und deklarieren Sie das Klassenfeld zur Aufnahme von TCodeEdit
Fügen Sie codeedit.pas zur Fenstereinheit hinzu, die TCodeEdit verwenden und Klassenmitgliedsvariablen deklarieren muss.
uses codeedit;
type
TMainForm = class (TForm)
private
FEdit: TCodeEdit ;
procedure EditStatus (Sender: TObject);
end ;
Platzieren Sie einen TCodeEdit an der gewünschten Stelle, indem Sie PlaceACodeEdit() aufrufen.
Rufen Sie die PlaceACodeEdit-Funktion auf, um TCodeEdit an der erforderlichen Stelle zu platzieren.
procedure TMainForm.FormCreate (Sender: TObject);
begin
FEdit := PlaceACodeEdit(Self);
FEdit.OnStatus := @EditStatus;
end ;
Reagiert auf das OnStatus-Ereignis, um den Editorstatus anzuzeigen und Menüs oder Schaltflächen zu aktivieren/deaktivieren.
Reagieren Sie auf das OnStatus-Ereignis, um den Editorstatus anzuzeigen und die Eigenschaften verwandter Menüs, Schaltflächen und anderer Komponenten zu ändern.
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 ;
So öffnen Sie eine Datei.
So öffnen Sie eine Datei.
procedure TMainForm.FileOpenMenuClick (Sender: TObject);
begin
CloseDialogs;
if OpenDialog.Execute then
FEdit.Lines.LoadFromFile(OpenDialog.FileName);
end ;
Basierend auf der Dateierweiterung wählt TCodeEdit automatisch die bevorzugte Sprachsyntax aus.
Nach dem Öffnen der Datei wählt TCodeEdit automatisch die passende Syntaxhervorhebungsklasse basierend auf dem Dateisuffix aus.
So verwenden Sie die Syntaxklasse manuell.
So legen Sie Syntaxhervorhebungsklassen manuell fest.
FEdit.Syntax.SyntaxClass := TPascalSyntax;
FEdit.Syntax.SyntaxClass := FindSyntax( ' Pascal ' );
FEdit.Syntax.SyntaxClass := FindSyntaxByFileExt( ' .pas ' );
FEdit.Syntax.SyntaxClass := FindFileSyntax( ' ~/editor/frmmain.pas ' );