synedit.doc

unit SynEdit; {$I SynEdit.inc} interface uses Windows, Messages, SysUtils, Classes, Controls, Graphics, Forms, StdCtrls, SynEditTypes, SynEditMiscProcs, SynEditMiscClasses, SynEditTextBuffer, SynEditKeyCmds, SynEditSearch, SynEditHighlighter, {$IFDEF SYN_MBCSSUPPORT} Imm, {$ENDIF} uTextDrawer; const DIGIT = [0..9]; // ALPHA = [A..Z, a..z]; // break these up because we exceed the 4 byte limit when combined. ALPHA_UC = [A..Z]; ALPHA_LC = [a..z]; {$IFNDEF SYN_COMPILER_3_UP} // not defined in all Delphi versions WM_MOUSEWHEEL = $020A; {$ENDIF} // maximum scroll range MAX_SCROLL = 32767; // Max number of book/gutter marks returned from GetEditMarksForLine - that // really should be enough. maxMarks = 16; SYNEDIT_CLIPBOARD_FORMAT = SynEdit Control Block Type; var SynEditClipboardFormat: UINT; {$IFDEF SYN_MBCSSUPPORT} {$IFNDEF SYN_COMPILER_4_UP} {Windows.pas in D4} const C3_NONSPACING = 1; { nonspacing character } C3_DIACRITIC = 2; { diacritic mark } C3_VOWELMARK = 4; { vowel mark } C3_SYMBOL = 8; { symbols } C3_KATAKANA = $0010; { katakana character } C3_HIRAGANA = $0020; { hiragana character } C3_HALFWIDTH = $0040; { half width character } C3_FULLWIDTH = $0080; { full width character } C3_IDEOGRAPH = $0100; { ideographic character } C3_KASHIDA = $0200; { Arabic kashida character } C3_LEXICAL = $0400; { lexical character } C3_ALPHA = $8000; { any linguistic char (C1_ALPHA) } C3_NOTAPPLICABLE = 0; { ctype 3 is not applicable } {$ENDIF} {$ENDIF} type TSynSearchOption = (ssoMatchCase, ssoWholeWord, ssoBackwards, ssoEntireScope, ssoSelectedOnly, ssoReplace, ssoReplaceAll, ssoPrompt); TSynSearchOptions = set of TSynSearchOption; TSynReplaceAction = (raCancel, raSkip, raReplace, raReplaceAll); ESynEditError = class(Exception); TDropFilesEvent = procedure(Sender: TObject; X, Y: integer; Files: TStrings) of object; TH