Class tsyntaxedit

Unit

msesyntaxedit

Declaration

type tsyntaxedit = class(tundotextedit)

Description

Hierarchy

• TObject
• TPersistent
• tcomponent
• tmsecomponent
• tactcomponent
• twidget
• tactionwidget
• tactionpublishedwidgetnwr
• tpublishedwidgetnwr
• tpublishedwidget
• tcustomedit
• tcustomtextedit
• ttextedit
• tundotextedit
• tsyntaxedit

Overview

Fields

	foptions: syntaxeditoptionsty;
	fmark1: markitemty;
	fmark2: markitemty;

Methods

	procedure initsyntaxparams();
	procedure objectevent(const sender: tobject; const event: objecteventty); override;
	procedure gridvaluechanged(const index: integer); override;
	procedure insertlinebreak; override;
	procedure dokeydown(var info: keyeventinfoty); override;
	procedure loaded; override;
	function createdatalist(const sender: twidgetcol): tdatalist; override;
	procedure defineproperties(filer: tfiler); override;
	procedure clearpairmarks();
	procedure checkpairmarks();
	procedure editnotification(var info: editnotificationinfoty); override;
	procedure doasyncevent(var atag: integer); override;
	procedure doafterpaint(const canvas: tcanvas); override;
	function needsfocuspaint: boolean; override;
	constructor create(aowner: tcomponent); override;
	destructor destroy; override;
	procedure setsyntaxdef(const sourcefilename: filenamety); overload;
	procedure setsyntaxdef(const handle: integer); overload;
	procedure refreshsyntax(const start,count: integer);
	function charatpos(const apos: gridcoordty): msechar;
	function charbeforepos(const apos: gridcoordty): msechar;
	function wordatpos(const apos: gridcoordty; out word: msestring; const delimchars: msestring; const nodelimstrings: array of msestring; const leftofcursor: boolean = false): gridcoordty; overload;
	function wordatpos(const apos: gridcoordty; out start: gridcoordty; const delimchars: msestring; const nodelimstrings: array of msestring; const leftofcursor: boolean = false): msestring; overload;
	function wordatpos(const apos: gridcoordty; const delimchars: msestring; const nodelimstrings: array of msestring; const leftofcursor: boolean = false): msestring; overload;
	procedure indent(const acount: integer; const atabs: boolean);
	procedure unindent(const acount: integer);
	procedure removelink;
	procedure showlink(const apos: gridcoordty; const delimchars: msestring );
	procedure selectword(const apos: gridcoordty; const delimchars: msestring);
	function matchbracket(const apos: gridcoordty; const akind: bracketkindty; const open: boolean; maxrows: int32 = -1): gridcoordty;
	function matchpairword(var apos: gridcoordty; out lena,lenb: int32; maxrows: int32 = -1): gridcoordty;
	function syntaxchanging: boolean;

Properties

	property pairwords: pairwordsty read fpairwords write setpairwords;
	property syntaxpainterhandle: integer read fsyntaxpainterhandle;
	property autoindent: boolean read getautoindent write setautoindent;
	property markbrackets: boolean read getmarkbrackets write setmarkbrackets;
	property markpairwords: boolean read getmarkpairwords write setmarkpairwords;
	property caseinsensitive: boolean read getcaseinsensitive write setcaseinsensitive;
	property syntaxpainter: tsyntaxpainter read fsyntaxpainter write setsyntaxpainter;
	property options: syntaxeditoptionsty read foptions write setoptions default [];
	property pairmarkbkgcolor: colorty read fpairmarkbkgcolor write fpairmarkbkgcolor default cl_none;
	property pairmaxrowcount: int32 read fpairmaxrowcount write fpairmaxrowcount default defaultpairmaxrowcount;

Description

Fields

	foptions: syntaxeditoptionsty;

	fmark1: markitemty;

	fmark2: markitemty;

Methods

	procedure initsyntaxparams();

	procedure objectevent(const sender: tobject; const event: objecteventty); override;

	procedure gridvaluechanged(const index: integer); override;

	procedure insertlinebreak; override;

	procedure dokeydown(var info: keyeventinfoty); override;

	procedure loaded; override;

	function createdatalist(const sender: twidgetcol): tdatalist; override;

	procedure defineproperties(filer: tfiler); override;

	procedure clearpairmarks();

	procedure checkpairmarks();

	procedure editnotification(var info: editnotificationinfoty); override;

	procedure doasyncevent(var atag: integer); override;

	procedure doafterpaint(const canvas: tcanvas); override;

	function needsfocuspaint: boolean; override;

	constructor create(aowner: tcomponent); override;

	destructor destroy; override;

	procedure setsyntaxdef(const sourcefilename: filenamety); overload;

	procedure setsyntaxdef(const handle: integer); overload;

	procedure refreshsyntax(const start,count: integer);

	function charatpos(const apos: gridcoordty): msechar;

	function charbeforepos(const apos: gridcoordty): msechar;

	function wordatpos(const apos: gridcoordty; out word: msestring; const delimchars: msestring; const nodelimstrings: array of msestring; const leftofcursor: boolean = false): gridcoordty; overload;

	function wordatpos(const apos: gridcoordty; out start: gridcoordty; const delimchars: msestring; const nodelimstrings: array of msestring; const leftofcursor: boolean = false): msestring; overload;

	function wordatpos(const apos: gridcoordty; const delimchars: msestring; const nodelimstrings: array of msestring; const leftofcursor: boolean = false): msestring; overload;

	procedure indent(const acount: integer; const atabs: boolean);

	procedure unindent(const acount: integer);

	procedure removelink;

	procedure showlink(const apos: gridcoordty; const delimchars: msestring );

	procedure selectword(const apos: gridcoordty; const delimchars: msestring);

	function matchbracket(const apos: gridcoordty; const akind: bracketkindty; const open: boolean; maxrows: int32 = -1): gridcoordty;

	function matchpairword(var apos: gridcoordty; out lena,lenb: int32; maxrows: int32 = -1): gridcoordty;

	function syntaxchanging: boolean;

Properties

	property pairwords: pairwordsty read fpairwords write setpairwords;

	property syntaxpainterhandle: integer read fsyntaxpainterhandle;

	property autoindent: boolean read getautoindent write setautoindent;

	property markbrackets: boolean read getmarkbrackets write setmarkbrackets;

	property markpairwords: boolean read getmarkpairwords write setmarkpairwords;

	property caseinsensitive: boolean read getcaseinsensitive write setcaseinsensitive;

	property syntaxpainter: tsyntaxpainter read fsyntaxpainter write setsyntaxpainter;

	property options: syntaxeditoptionsty read foptions write setoptions default [];

	property pairmarkbkgcolor: colorty read fpairmarkbkgcolor write fpairmarkbkgcolor default cl_none;

	property pairmaxrowcount: int32 read fpairmaxrowcount write fpairmaxrowcount default defaultpairmaxrowcount;