是否有DScintilla的语法高亮显示示例?

bee*_*win 6 delphi scintilla

我已经安装了DScintillaDelphi VCL包装器,用于Scintilla代码编辑组件,但我找不到任何基本的如何使用它的例子.

你能发布一些语法高亮的基本代码示例或者代码示例的引用吗?

TLa*_*ama 4

非常有趣的库,但很难说你到底想用它做什么。例如,这里是 Pascal 语法荧光笔的一些基本颜色设置的示例。请注意,您需要SciLexer.dll在项目文件夹(或应用程序查找它的文件夹)中包含该库。

这个库包装器提供了许多具有有意义名称的功能,因此我认为最好的是您自己浏览它们。

uses
  DScintillaTypes, DScintilla;

procedure TForm1.Button1Click(Sender: TObject);
var
  Scintilla: TDScintilla;
begin
  Scintilla := TDScintilla.Create(Self); // creating it dynamically, it's also available as a component, so you don't need to do this
  Scintilla.DllModule := 'SciLexer.dll'; // the syntax library
  Scintilla.Align := alClient;           // object alignment to the whole parent
  Scintilla.Parent := Self;              // setting up the parent
  Scintilla.SetLexer(SCLEX_PASCAL);      // and setting the syntax highlighter, see SCLEX_ types in DScintillaTypes.pas

  Scintilla.StyleSetBack(STYLE_DEFAULT, clBlack); // setting up the default background color
  Scintilla.StyleSetFore(SCE_PAS_DEFAULT, clWhite); // Pascal specific default fore color
  Scintilla.StyleSetBack(SCE_PAS_DEFAULT, clBlack); // Pascal specific default back color
  Scintilla.StyleSetFore(SCE_PAS_IDENTIFIER, clYellow); // Pascal specific identifier fore color
  Scintilla.StyleSetBack(SCE_PAS_IDENTIFIER, clBlack); // Pascal specific identifier back color
  Scintilla.StyleSetBold(SCE_PAS_IDENTIFIER, True); // Pascal specific identifier bold font style
  Scintilla.StyleSetUnderline(SCE_PAS_IDENTIFIER, True); // Pascal specific identifier underline font style
  Scintilla.StyleSetFore(SCE_PAS_COMMENT, RGB(243, 236, 255)); // etc.
  Scintilla.StyleSetBack(SCE_PAS_COMMENT, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_COMMENT2, RGB(243, 236, 255));
  Scintilla.StyleSetBack(SCE_PAS_COMMENT2, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_COMMENTLINE, RGB(243, 236, 255));
  Scintilla.StyleSetBack(SCE_PAS_COMMENTLINE, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_NUMBER, RGB(243, 236, 255));
  Scintilla.StyleSetBack(SCE_PAS_NUMBER, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_HEXNUMBER, RGB(243, 236, 255));
  Scintilla.StyleSetBack(SCE_PAS_HEXNUMBER, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_WORD, RGB(243, 236, 255));
  Scintilla.StyleSetBack(SCE_PAS_WORD, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_STRING, RGB(243, 236, 255));
  Scintilla.StyleSetBack(SCE_PAS_STRING, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_STRINGEOL, RGB(243, 236, 255));
  Scintilla.StyleSetBack(SCE_PAS_STRINGEOL, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_CHARACTER, RGB(243, 236, 255));
  Scintilla.StyleSetBack(SCE_PAS_CHARACTER, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_OPERATOR, clRed);
  Scintilla.StyleSetBack(SCE_PAS_OPERATOR, clBlack);
  Scintilla.StyleSetFore(SCE_PAS_ASM, clRed);
  Scintilla.StyleSetBack(SCE_PAS_ASM, clBlack);
end;
Run Code Online (Sandbox Code Playgroud)