Dear Neil, First we thank you for adding Editawy to your related web page, we are preparing a full documentation and related pages about editawy and your unparalled editing component adn of course all credits for that goes to you and your supported large community.
Below I extracted the components properties just for previews and any feedback will be more than welcomed from any one. We used the same functions name conventions as the Scintilla to make it easy to spot, All functions nearly have the same name as the Scintilla after removing the prefix "SCI_" , for example, for SCI_GETTEXTLENGTH, the function GetTextLength and so on. Thank you '========================================================== EditawyX Interface Definition General Information Library: EditawyX (Editawy Source Editor Control) File: C:\VBmyProjects\Editawy\Editawy.ocx GUID: 9AA2B010-29D7-4BAF-829F-4BF3233B3E66 (This will be changed during the beta versions) Version: 53.0 Enumerations This section lists enumerations exposed by EditawyX. Public Enum CaseMode MIXED=0 ' MIXED Upper=1 ' Upper Lower=2 ' Lower End Enum Public Enum CharSet ANSI=0 ' ANSI default=1 ' default BALTIC=186 ' BALTIC CHINESEBIG5=136 ' CHINESEBIG5 EASTEUROPE=238 ' EASTEUROPE GB2312=134 ' GB2312 GREEK=161 ' GREEK HANGUL=129 ' HANGUL Mac=77 ' Mac OEM=255 ' OEM RUSSIAN=204 ' RUSSIAN SHIFTJIS=128 ' SHIFTJIS Symbol=2 ' Symbol TURKISH=162 ' TURKISH JOHAB=130 ' JOHAB HEBREW=177 ' HEBREW ARABIC=178 ' ARABIC VIETNAMESE=163 ' VIETNAMESE THAI=222 ' THAI End Enum Public Enum EdgeMode EDGE_NONE=0 ' EDGE_NONE EDGE_LINE=1 ' EDGE_LINE EDGE_BACKGROUND=2 ' EDGE_BACKGROUND End Enum Public Enum EMsgResponse emrConsume=0 ' emrConsume emrPostProcess=1 ' emrPostProcess emrPreprocess=2 ' emrPreprocess End Enum Public Enum EOL EolCRLF=0 ' EolCRLF EolCR=1 ' EolCR EolLF=2 ' EolLF End Enum Public Enum LexerCode Container=0 ' Container Nu11=1 ' Nu11 PYTHON=2 ' PYTHON CPP=3 ' CPP HTML=4 ' HTML xml=5 ' xml PERL=6 ' PERL SQL=7 ' SQL VB=8 ' VB Properties=9 ' Properties ERRORLIST=10 ' ERRORLIST MAKEFILE=11 ' MAKEFILE BATCH=12 ' BATCH XCODE=13 ' XCODE LATEX=14 ' LATEX LUA=15 ' LUA DIFF=16 ' DIFF CONF=17 ' CONF PASCAL=18 ' PASCAL AVE=19 ' AVE ADA=20 ' ADA LISP=21 ' LISP RUBY=22 ' RUBY EIFFEL=23 ' EIFFEL EIFFELKW=24 ' EIFFELKW TCL=25 ' TCL NNCRONTAB=26 ' NNCRONTAB BULLANT=27 ' BULLANT VBSCRIPT=28 ' VBSCRIPT ASP=29 ' ASP PHP=30 ' PHP BAAN=31 ' BAAN MATLAB=32 ' MATLAB SCRIPTOL=33 ' SCRIPTOL ASM=34 ' ASM CPPNOCASE=35 ' CPPNOCASE FORTRAN=36 ' FORTRAN F77=37 ' F77 CSS=38 ' CSS POV=39 ' POV LOUT=40 ' LOUT ESCRIPT=41 ' ESCRIPT PS=42 ' PS NSIS=43 ' NSIS MMIXAL=44 ' MMIXAL CLW=45 ' CLW CLWNOCASE=46 ' CLWNOCASE LOT=47 ' LOT YAML=48 ' YAML TEX=49 ' TEX METAPOST=50 ' METAPOST POWERBASIC=51 ' POWERBASIC FORTH=52 ' FORTH ERLANG=53 ' ERLANG OCTAVE=54 ' OCTAVE MSSQL=55 ' MSSQL VERILOG=56 ' VERILOG KIX=57 ' KIX GUI4CLI=58 ' GUI4CLI SPECMAN=59 ' SPECMAN AU3=60 ' AU3 APDL=61 ' APDL BASH=62 ' BASH ASN1=63 ' ASN1 VHDL=64 ' VHDL CAML=65 ' CAML BLITZBASIC=66 ' BLITZBASIC PUREBASIC=67 ' PUREBASIC HASKELL=68 ' HASKELL PHPSCRIPT=69 ' PHPSCRIPT TADS3=70 ' TADS3 REBOL=71 ' REBOL SMALLTALK=72 ' SMALLTALK FLAGSHIP=73 ' FLAGSHIP CSOUND=74 ' CSOUND AUTOMATIC=1000 ' AUTOMATIC End Enum Public Enum modificationType MOD_INSERTTEXT=1 ' MOD_INSERTTEXT MOD_DELETETEXT=2 ' MOD_DELETETEXT MOD_CHANGESTYLE=4 ' MOD_CHANGESTYLE MOD_CHANGEFOLD=8 ' MOD_CHANGEFOLD PERFORMED_USER=16 ' PERFORMED_USER PERFORMED_UNDO=32 ' PERFORMED_UNDO PERFORMED_REDO=64 ' PERFORMED_REDO MULTISTEPUNDOREDO=128 ' MULTISTEPUNDOREDO LASTSTEPINUNDOREDO=256 ' LASTSTEPINUNDOREDO MOD_CHANGEMARKER=512 ' MOD_CHANGEMARKER MOD_BEFOREINSERT=1024 ' MOD_BEFOREINSERT MOD_BEFOREDELETE=2048 ' MOD_BEFOREDELETE MULTILINEUNDOREDO=4096 ' MULTILINEUNDOREDO MODEVENTMASKALL=8191 ' MODEVENTMASKALL End Enum Public Enum PrintColourMode Normal=0 ' Normal InvertLight=1 ' InvertLight BlackOnWhite=2 ' BlackOnWhite ColourOnWhite=3 ' ColourOnWhite ColourOnWhiteDefaultBG=4 ' ColourOnWhiteDefaultBG End Enum Public Enum SearchFlags FindNormal=0 ' FindNormal FindWholeWord=2 ' FindWholeWord FindMatchCase=4 ' FindMatchCase FindWordStart=1048576 ' FindWordStart FindRegExp=2097152 ' FindRegExp FindPosIX=4194304 ' FindPosIX End Enum Public Enum SelectionMode StreamMode=1 ' StreamMode RectangleMode=2 ' RectangleMode LinesMode=3 ' LinesMode End Enum Public Enum WhiteSpace Invisible=0 ' Invisible VisibleAlways=1 ' VisibleAlways VisibleAfterIndent=2 ' VisibleAfterIndent End Enum Public Enum WindowState START_HIDDEN=0 ' START_HIDDEN START_NORMAL=4 ' START_NORMAL START_MINIMIZED=2 ' START_MINIMIZED START_MAXIMIZED=3 ' START_MAXIMIZED End Enum Public Enum WrapMode WrapNone=0 ' WrapNone WrapWord=1 ' WrapWord WrapChar=2 ' WrapChar End Enum Interfaces This section lists the Classes exposed by EditawyX. For each class, the methods and events are listed. CharacterRange Public Type CharacterRange cpMin As Long ' cpMin cpMax As Long ' cpMax End Type clsEditor Methods Sub Attach(ByVal frm As Long) Sub Detach(ByVal frm As Long) Function CreateEditor(ByVal frm As Long) As Long Property Get ObjectFromPtr(ByVal lPtr As Long) As Object Events Public Event RaiseEvents(ByVal hwnd As Long, ByVal iMsg As Long, ByVal wParam As Long, ByVal lParam As Long) Public Event RaiseWindowsEvents(ByVal hwnd As Long, ByVal iMsg As Long, ByVal wParam As Long, ByVal lParam As Long) Editawy Methods Sub Initialize Sub ChangeDefault Sub Resize(ByVal lLeft As Long, ByVal lTop As Long, ByVal lWidth As Long, ByVal lHeight As Long) Function Message(ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Variant) As Variant Function SendEditor(ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Variant) As Variant Function RecordMacro(ByVal macroNumber As Long) As Boolean Function PlayMacro(ByVal macroNumber As Long) As Boolean Sub ClearMacro(ByVal macroNumber As Long) Sub ClearAllMacros Function GetMacro(ByVal macroNumber As Long) As String Function IsMacro(ByVal macroNumber As Long) As Boolean Sub StartRecord Sub StopRecord Sub FoldChanged(ByVal Line As Long, ByVal levelNow As Long, ByVal levelPrev As Long) Sub Expand(ByVal Line As Long, ByVal doExpand As Boolean, ByVal force As Boolean, ByVal visLevels As Long, ByVal level As Long) Sub ExpandAll Sub CollapseAll Sub FoldAll Sub GotoLineEnsureVisible(ByVal Line As Long) Sub EnsureRangeVisible(ByVal posStart As Long, ByVal posEnd As Long, ByVal enforcePolicy As Boolean) Sub MarginClicked(ByVal Position As Long, ByVal Modifiers As Long, ByVal Margin As Long) Sub ToggleFoldRecursive(ByVal Line As Long, ByVal level As Long) Sub ToggleFoldRecursively Sub ExpanedEnsureChildrenVisible Sub EnsureAllChildrenVisible(ByVal Line As Long, ByVal level As Long) Sub FindBox(ByVal frmOwner As Variant) Sub ReplaceBox(ByVal frmOwner As Variant) Sub GoToBox(ByVal frmOwner As Variant) Sub Style(ByVal sty As Long, ByVal ForeColor As Long, ByVal BackColor As Long, ByVal fnt As Font, ByVal eolFilled As Boolean, ByVal SetVisible As Boolean, ByVal SetCase As CaseMode, ByVal SetCharset As CharSet) Function MakeBool(ByVal SciBool As Long) As Boolean Function SciBool(ByVal bValue As Boolean) As Long Property Get SymbolMargin() As Boolean Property Let SymbolMargin(RHS As Boolean) Property Get LineNumbers() As Boolean Property Let LineNumbers(RHS As Boolean) Property Get Folding() As Boolean Property Let Folding(RHS As Boolean) Sub DefineMarker(ByVal marker As Long, ByVal markerType As Long, ByVal Fore As Long, ByVal Back As Long) Sub ColorToRGB(ByVal lngColor As Long, ByVal intRed As Integer, ByVal intGreen As Integer, ByVal intBlue As Integer) Function MakeColor(ByVal lColor As Long) As Long Property Get EOLVisible() As Boolean Property Let EOLVisible(RHS As Boolean) Function Byte2Str(ByVal bVal() As Byte) As String Function hwnd() As Long Function HwndWin() As Long Sub SetFocusWin(ByVal hwnd As Long) Sub SetFocus Sub LoadDefaultMarkers Function GetUserMode() As Boolean Function TotalLines() As Long Function Lines() As Long Property Get EndOfLine() As EOL Property Let EndOfLine(RHS As EOL) Property Get Text() As String Property Let Text(RHS As String) Function GetLineX(ByVal lineNumber As Long) As String Function GetLine(ByVal lineNumber As Long) As String Sub ReplaceSel(ByVal strText As String) Property Get ReadOnly() As Boolean Property Let ReadOnly(RHS As Boolean) Function GetTextRange(ByVal lRangeStart As Long, ByVal lRangeEnd As Long) As String Function GetStyledText(ByVal startPos As Long, ByVal endPos As Long) As String Sub Allocate(ByVal lBytes As Long) Sub AddText(ByVal sText As String) Sub AddStyledText(ByVal sText As String) Sub AppendText(ByVal sText As String) Sub InsertText(ByVal Pos As Long, ByVal sText As String) Sub ClearAll Sub ClearDocumentStyle Function GetCharAt(ByVal Pos As Long) As String Function GetCharAtAsc(ByVal Pos As Long) As String Function GetStyleAt(ByVal Pos As Long) As Long Sub SetStyleBits(ByVal Bits As Long) Function GetStyleBits() As Long Function FindText(ByVal SearchFlags As SearchFlags, ByVal startPos As Long, ByVal endPos As Long, ByVal Text As String, ByVal SearchEndPos As Long, ByVal Backward As Boolean) As Long Function Find(ByVal TxtToFind As String, ByVal FindReverse As Boolean, ByVal FindinRng As Boolean, ByVal WrapDocument As Boolean, ByVal CaseSensative As Boolean, ByVal WordStart As Boolean, ByVal WholeWord As Boolean, ByVal RegExp As Boolean) As Long Function FindNext() As Long Function FindPrev() As Long Function Search(ByVal TxtToFind As String, ByVal FindReverse As Boolean, ByVal FindinRng As Boolean, ByVal WrapDocument As Boolean, ByVal CaseSensative As Boolean, ByVal WordStart As Boolean, ByVal WholeWord As Boolean, ByVal RegExp As Boolean) As Long Function SearchNext() As Long Function SearchPrev() As Long Function ReplaceText(ByVal strSearchFor As String, ByVal strReplaceWith As String, ByVal ReplaceAll As Boolean, ByVal FindReverse As Boolean, ByVal FindinRng As Boolean, ByVal WrapDocument As Boolean, ByVal CaseSensative As Boolean, ByVal WordStart As Boolean, ByVal WholeWord As Boolean, ByVal RegExp As Boolean) As Long Function MarkAll(ByVal TxtToFind As String, ByVal FindReverse As Boolean, ByVal FindinRng As Boolean, ByVal WrapDocument As Boolean, ByVal CaseSensative As Boolean, ByVal WordStart As Boolean, ByVal WholeWord As Boolean, ByVal RegExp As Boolean, ByVal markerNumner As Long) As Long Sub SearchAnchor Function SearchN(ByVal SearchFlags As SearchFlags, ByVal sText As String) As Long Function SearchP(ByVal SearchFlags As SearchFlags, ByVal sText As String) As Long Sub SetTargetStart(ByVal Pos As Long) Function GetTargetStart() As Long Sub SetTargetEnd(ByVal Pos As Long) Function GetTargetEnd() As Long Sub TargetFromSelection Sub SetSearchFlagsAll(ByVal SearchFlags As SearchFlags) Function GetSearchFlagsAll() As SearchFlags Sub SetSearchFlags(ByVal WholeWord As Boolean, ByVal MatchCase As Boolean, ByVal WordStart As Boolean, ByVal RegExp As Boolean, ByVal PosIX As Boolean) Function GetSearchFlags(ByVal WholeWord As Boolean, ByVal MatchCase As Boolean, ByVal WordStart As Boolean, ByVal RegExp As Boolean, ByVal PosIX As Boolean) As Long Function SearchInTarget(ByVal TextToFind As String) As Long Function ReplaceTarget(ByVal TextToReplace As String) As Long Function ReplaceTargetRE(ByVal TextToReplace As String) As Long Sub SetOverType(ByVal overType As Boolean) Function GetOverType() As Boolean Sub Cut Sub Copy Sub Paste Sub Clear Sub Delete Function CanPaste() As Boolean Function CanCut() As Boolean Function CanCopy() As Boolean Sub CopyRange(ByVal lStart As Long, ByVal lEnd As Long) Sub CopyText(ByVal sText As String) Sub SetClipboard(ByVal sText As String) Function GetClipboard() As String Sub ClearClipboard Sub SetStatus(ByVal lStatus As Long) Function GetStatus() As Long Sub Undo Function CanUndo() As Boolean Sub Redo Function CanRedo() As Boolean Sub EmptyUndoBuffer Sub SetUndoCollection(ByVal bValue As Boolean) Function GetUndoCollection() As Boolean Sub BeginUndoAction Sub EndUndoAction Function GetTextLength() As Long Function GetLineCount() As Long Function length() As Long Function GetFirstVisibleLine() As Long Function LinesOnScreen() As Long Function GetModify() As Boolean Function Modified() As Boolean Sub SetSel(ByVal targetstart As Long, ByVal targetend As Long) Sub GoToPos(ByVal lPosition As Long) Sub GoToLine(ByVal lLineNmber As Long) Sub SetCurrentPos(ByVal lPosition As Long) Function GetCurrentPos() As Long Sub SetAnchor(ByVal lPosition As Long) Function GetAnchor() As Long Sub SetSelectionStart(ByVal lPosition As Long) Sub SetSelectionEnd(ByVal lPosition As Long) Function GetSelectionStart() As Long Function GetSelectionEnd() As Long Function GetSelectionLength() As Long Sub SelectAll Function LineFromPosition(ByVal lPosition As Long) As Long Function PositionFromLine(ByVal lLineNumber As Long) As Long Function GetCurrentLineNumber() As Long Function Line() As Long Function GetLineEndPosition(ByVal lLineNumber As Long) As Long Function LineLength(ByVal lineNumber As Long) As Long Function GetSelText() As String Function GetCurLine(ByVal sText As String) As Long Function SelectionRectangle() As Boolean Sub SetSelectionMode(ByVal lMode As SelectionMode) Function GetSelectionMode() As Long Function GetLineSelectionStartPosition(ByVal lLineNumber As Long) As Long Function GetLineSelectionEndPosition(ByVal lLineNumber As Long) As Long Sub MoveCaretInsideView Function WordEndPosition(ByVal Position As Long, ByVal onlyWordCharacters As Boolean) As Long Function wordStartPosition(ByVal Position As Long, ByVal onlyWordCharacters As Boolean) As Long Function PositionBefore(ByVal Position As Long) As Long Function PositionAfter(ByVal Position As Long) As Long Function TextWidth(ByVal styleNumber As Long, ByVal sText As String) As Long Function TextHeight(ByVal lLineNumber As Long) As Long Function GetColumn(ByVal lPosition As Long) As Long Function FindColumn(ByVal lLineNumber As Long, ByVal lColumn As Long) As Long Function PositionFromPoint(ByVal X As Long, ByVal Y As Long) As Long Function PositionFromPointClose(ByVal X As Long, ByVal Y As Long) As Long Function PointXFromPosition(ByVal lPos As Long) As Long Function PointYFromPosition(ByVal lPos As Long) As Long Sub HideSelection(ByVal bValue As Boolean) Sub ChooseCaretX Sub LineScroll(ByVal lColumn As Long, ByVal lLine As Long) Sub ScrollCaret Sub SetXCaretPolicy(ByVal caretPolicy As Long, ByVal caretSlop As Long) Sub SetYCaretPolicy(ByVal caretPolicy As Long, ByVal caretSlop As Long) Sub SetVisiblePolicy(ByVal caretPolicy As Long, ByVal caretSlop As Long) Sub SetHScrollBar(ByVal bVisible As Boolean) Function GetHorScrollBar() As Boolean Sub SetVScrollBar(ByVal bVisible As Boolean) Function GetVerScrollBar() As Boolean Sub SetXOffset(ByVal lPxiels As Long) Function GetXOffset() As Long Sub SetScrollWidth(ByVal PixelWidth As Long) Function GetScrollWidth() As Long Sub SetEndAtLastLine(ByVal endAtLastLine As Boolean) Function GetEndAtLastLine() As Boolean Sub SetViewWWS(ByVal wsMode As Long) Function GetViewWWS() As Long Property Get WhiteSpaceVisible() As WhiteSpace Property Let WhiteSpaceVisible(RHS As WhiteSpace) Sub SetWhiteSpaceFore(ByVal useWhitespaceForeColour As Boolean, ByVal Colour As Long) Sub SetWhiteSpaceBack(ByVal useWhitespaceBackColour As Boolean, ByVal Colour As Long) Sub SetCursor(ByVal lCurType As Long) Function GetCursor() As Long Sub SetMouseDownCaptures(ByVal bValue As Boolean) Function GetMouseDownCaptures() As Boolean Sub SetEOLMode(ByVal eolMode As Long) Function GetEOLMode() As Long Sub ConvertEOLs(ByVal eolMode As EOL) Sub SetViewEOL(ByVal bVisible As Boolean) Function GetViewEOL() As Boolean Function GetEndStyled() As Long Sub StartStyling(ByVal Pos As Long, ByVal Mask As Long) Sub SetStyling(ByVal lLength As Long, ByVal lStyle As Long) Sub SetStylingEX(ByVal lLength As Long, ByVal sStyles As Long) Sub SetLineState(ByVal lLine As Long, ByVal lValue As Long) Function GetLineState(ByVal lLine As Long) As Long Function GetMaxLineState() As Long Sub StyleResetDefault Sub StyleClearAll Sub StyleSetFont(ByVal styleNumber As Long, ByVal sFontName As String) Sub StyleSetSize(ByVal styleNumber As Long, ByVal sizeInPoints As Long) Sub StyleSetBold(ByVal styleNumber As Long, ByVal bBold As Boolean) Sub StyleSetItalic(ByVal styleNumber As Long, ByVal bItalic As Boolean) Sub StyleSetUnderline(ByVal styleNumber As Long, ByVal bUnderline As Boolean) Sub StyleSetFore(ByVal styleNumber As Long, ByVal Colour As Long) Sub StyleSetBack(ByVal styleNumber As Long, ByVal Colour As Long) Sub StyleSetEOLFilled(ByVal styleNumber As Long, ByVal eolFilled As Boolean) Sub StyleSetCharacterSet(ByVal styleNumber As Long, ByVal CharSet As CharSet) Sub StyleSetCase(ByVal styleNumber As Long, ByVal lCaseMode As CaseMode) Sub StyleSetVisible(ByVal styleNumber As Long, ByVal bVisible As Boolean) Sub StyleSetChangeable(ByVal styleNumber As Long, ByVal changeable As Boolean) Sub StyleSetHotSpot(ByVal styleNumber As Long, ByVal hotspot As Boolean) Sub SetSelFore(ByVal useSelectionForeColour As Boolean, ByVal Colour As Long) Sub SetSelBack(ByVal useSelectionBackColour As Boolean, ByVal Colour As Long) Sub SetCaretFore(ByVal Colour As Long) Function GetCaretFore() As Long Property Get CaretForeColor() As ULong Property Let CaretForeColor(RHS As ULong) Property Get CaretLineVisible() As Boolean Property Let CaretLineVisible(RHS As Boolean) Sub SetCaretLineVisible(ByVal bShow As Boolean) Function GetCaretLineVisible() As Long Property Get CaretLineBackColor() As ULong Property Let CaretLineBackColor(RHS As ULong) Sub SetCaretLineBack(ByVal Colour As Long) Function GetCaretLineBack() As Long Sub SetCaretPeriod(ByVal milliseconds As Long) Function GetCaretPeriod() As Long Sub SetCaretWidth(ByVal widthPixels As Long) Function GetCaretWidth() As Long Property Get CaretWidth() As Long Property Let CaretWidth(RHS As Long) Sub SetHotSpotActiveFore(ByVal useHotSpotForeColour As Boolean, ByVal Colour As Long) Sub SetHotSpotActiveBack(ByVal useHotSpotBackColour As Boolean, ByVal Colour As Long) Sub SetHotSpotActiveUnderline(ByVal bUnderline As Boolean, ByVal Colour As Long) Sub SetHotSpotSingleLine(ByVal singleLine As Boolean) Sub SetControlCharSymbol(ByVal Symbol As Long) Function GetControlCharSymbol() As Long Sub SetCaretSticky(ByVal useCaretStickyBehaviour As Boolean) Function GetCaretSticky() As Long Sub ToggleCaretSticky Sub SetMarginTypeN(ByVal Margin As Long, ByVal iType As Long) Function GetMarginTypeN(ByVal Margin As Long) As Long Sub SetMarginWidthN(ByVal Margin As Long, ByVal PixelWidth As Long) Function GetMarginWidthN(ByVal Margin As Long) As Long Sub SetMarginMaskN(ByVal Margin As Long, ByVal Mask As Long) Function GetMarginMaskN(ByVal Margin As Long) As Long Sub SetMarginSensitiveN(ByVal Margin As Long, ByVal Sensitive As Boolean) Function GetMarginSensitiveN(ByVal Margin As Long) As Long Sub SetMarginLeft(ByVal lPixels As Long) Function GetMarginLeft() As Long Sub SetMarginRight(ByVal lPixels As Long) Function GetMarginRight() As Long Sub SetFoldMarginColour(ByVal useSetting As Boolean, ByVal Colour As Long) Sub SetFoldMarginHiColour(ByVal useSetting As Boolean, ByVal Colour As Long) Sub SetUsePalette(ByVal allowPaletteUse As Boolean) Function GetUsePalette() As Boolean Sub SetBufferedDraw(ByVal isBuffered As Boolean) Function GetBufferedDraw() As Boolean Sub SetTwoPhaseDraw(ByVal twoPhase As Boolean) Function GetTwoPhaseDraw() As Boolean Sub SetCodePage(ByVal codePage As Long) Function GetCodePage() As Long Sub SetWordChars(ByVal wordChars As String) Sub SetWhiteSpaceChars(ByVal whitespaceChars As String) Sub SetCharsDefault Sub GrabFocus Sub SetFocusFlag(ByVal bFocus As Boolean) Function GetFocusFlag() As Boolean Sub BraceHighLight(ByVal Pos1 As Long, ByVal Pos2 As Long) Sub BraceBadLight(ByVal Pos1 As Long) Function BraceMatch(ByVal Pos As Long) As Long Sub SetTabWidth(ByVal lValue As Long) Function GetTabWidth() As Long Property Get TabWidth() As Long Property Let TabWidth(RHS As Long) Sub SetUseTabs(ByVal bValue As Boolean) Function GetUseTabs() As Boolean Sub SetIndent(ByVal lValue As Long) Function GetIndent() As Long Sub SetTabIndents(ByVal bValue As Boolean) Function GetTabIndents() As Boolean Sub SetBackspaceUnIndents(ByVal bValue As Boolean) Function GetBackspaceUnIndents() As Boolean Sub SetLineIndentation(ByVal lLine As Long, ByVal lIndentation As Long) Function GetLineIndentation(ByVal lLine As Long) As Long Function GetLineIndentPosition(ByVal lLine As Long) As Long Sub SetIndentationGuides(ByVal bValue As Boolean) Function GetIndentationGuides() As Boolean Sub SetHighlightGuide(ByVal lColumn As Long) Function GetHighlightGuide() As Long Sub MarkerDefine(ByVal markerNumber As Long, ByVal markerSymbols As Long) Sub MarkerSetFore(ByVal markerNumber As Long, ByVal markerColor As Long) Sub MarkerSetBack(ByVal markerNumber As Long, ByVal markerColor As Long) Function MarkerAdd(ByVal lineNumber As Long, ByVal markerNumber As Long) As Long Sub MarkerDelete(ByVal lineNumber As Long, ByVal markerNumber As Long) Sub MarkerDeleteAll(ByVal markerNumber As Long) Function MarkerGet(ByVal lineNumber As Long) As Long Function MarkerNext(ByVal lineStart As Long, ByVal markerMask As Long) As Long Function MarkerPrevious(ByVal lineStart As Long, ByVal markerMask As Long) As Long Function MarkerLineFromHandle(ByVal markerHandle As Long) As Long Sub MarkerDeleteHandle(ByVal markerHandle As Long) Sub IndicSetStyle(ByVal indicatorNumber As Long, ByVal indicatorStyle As Long) Function IndicGetStyle(ByVal indicatorNumber As Long) As Long Sub IndicSetFore(ByVal indicatorNumber As Long, ByVal indicatorColor As Long) Function IndicGetFore(ByVal indicatorNumber As Long) As Long Sub CallTipShow(ByVal tip As String, ByVal hltstart As Long, ByVal hltend As Long) Sub ShowCallTip(ByVal sTip As String) Sub CallTipCancel Function CallTipActive() As Boolean Function CallTipPosStart() As Long Sub CallTipSetHlt(ByVal hlStart As Long, ByVal hlEnd As Long) Sub CallTipSetBack(ByVal Colour As Long) Property Get CallTipBackColor() As ULong Property Let CallTipBackColor(RHS As ULong) Sub CallTipSetFore(ByVal Colour As Long) Property Get CallTipForeColor() As ULong Property Let CallTipForeColor(RHS As ULong) Sub CallTipSetForeHlt(ByVal Colour As Long) Property Get CallTipHltColor() As ULong Property Let CallTipHltColor(RHS As ULong) Sub KeyCmd(ByVal Command As Long) Sub KeyLineDown Sub KeyLineDownExtend Sub KeyLineDownRectExtend Sub KeyLineScrollDown Sub KeyLineUp Sub KeyLineUpExtend Sub KeyLineUpRectExtend Sub KeyLineScrollUp Sub KeyParaDown Sub KeyParaDownExtend Sub KeyParaUp Sub KeyParaUpExtend Sub KeyCharLeft Sub KeyCharLeftExtend Sub KeyCharLeftRectExtend Sub KeyCharRight Sub KeyCharRightExtend Sub KeyCharRightRectExtend Sub KeyWordLeft Sub KeyWordLeftExtend Sub KeyWordRight Sub KeyWordRightExtend Sub KeyWordLeftEnd Sub KeyWordLeftEndExtend Sub KeyWordRightEnd Sub KeyWordRightEndExtend Sub KeyWordPartLeft Sub KeyWordPartLeftExtend Sub KeyWordPartRight Sub KeyWordPartRightExtend Sub KeyHome Sub KeyHomeExtend Sub KeyHomeRectExtend Sub KeyHomeDisplay Sub KeyHomeDisplayExtend Sub KeyHomeWrap Sub KeyHomeWrapExtend Sub KeyVCHome Sub KeyVCHomeExtend Sub KeyVCHomeRectExtend Sub KeyVCHomeWrap Sub KeyVCHomeWrapExtend Sub KeyLineEnd Sub KeyLineEndExtend Sub KeyLineEndRectExtend Sub KeyLineEndDisplay Sub KeyLineEndDisplayExtend Sub KeyLineEndWrap Sub KeyLineEndWrapExtend Sub KeyDocumentStart Sub KeyDocumentStartExtend Sub KeyDocumentEnd Sub KeyDocumentEndExtend Sub KeyPageUp Sub KeyPageUpExtend Sub KeyPageUpRectExtend Sub KeyPageDown Sub KeyPageDownExtend Sub KeyPageDownRectExtend Sub KeyStutteredPageUp Sub KeyStutteredPageUpExtend Sub KeyStutteredPageDown Sub KeyStutteredPageDownExtend Sub KeyDeleteBack Sub KeyDeleteBackNotLine Sub KeyDelWordLeft Sub KeyDelWordRight Sub KeyDelLineLeft Sub KeyDelLineRight Sub KeyLineDelete Sub KeyLineCut Sub KeyLineCopy Sub KeyLineTranspose Sub KeyLineDuplicate Sub KeyLowerCase Sub KeyUpperCase Sub KeyCancel Sub KeyEditToggleOverType Sub KeyNewLine Sub KeyFormFeed Sub KeyTab Sub KeyBackTab Sub AssignCmdKey(ByVal keyDefinition As Long, ByVal Command As Long) Sub ClearCmdKey(ByVal keyDefinition As Long) Sub CearAllCmdKeys Sub NullCmd Sub UsePopUp(ByVal bValue As Boolean) Property Get MatchBraces() As Boolean Property Let MatchBraces(RHS As Boolean) Function CharAtPos(ByVal Position As Long) As Long Property Get HScrollBar() As Boolean Property Let HScrollBar(RHS As Boolean) Property Get IndGuides() As Boolean Property Let IndGuides(RHS As Boolean) Function Column() As Long Function GetCurColumn() As Long Sub SetSavePoint Function GetCurrentLineLength() As Long Function GetCurrentLineCartPosition() As Long Function GetCurrentLineText() As String Function VisibleFromDocLine(ByVal docLine As Long) As Long Function DocLineFromVisible(ByVal displayLine As Long) As Long Sub ShowLines(ByVal lineStart As Long, ByVal lineEnd As Long) Sub HideLines(ByVal lineStart As Long, ByVal lineEnd As Long) Function GetLineVisible(ByVal lineNumber As Long) As Boolean Sub SetFoldLevel(ByVal lLine As Long, ByVal lLevel As Long) Function GetFoldLevel(ByVal lLine As Long) As Long Sub SetFoldFlags(ByVal flags As Long) Function GetLastChild(ByVal startLine As Long, ByVal lLevel As Long) As Long Function GetFoldParent(ByVal startLine As Long) As Long Sub ToggleFold(ByVal lLine As Long) Sub SetFoldExpanded(ByVal lLine As Long, ByVal bExpaned As Boolean) Function GetFoldExpanded(ByVal lLine As Long) As Long Sub EnsureVisible(ByVal lLine As Long) Sub EnsureVisibleEnforcePolicy(ByVal lLine As Long) Sub SetWrapMode(ByVal WrapMode As Long) Function GetWrapMode() As Long Property Get WrapMode() As WrapMode Property Let WrapMode(RHS As WrapMode) Sub SetWrapVisualFlags(ByVal wrapVisualFlags As Long) Function GetWrapVisualFlags() As Long Sub SetWrapVisualFlagsLocation(ByVal wrapVisualFlagsLocation As Long) Function GetWrapVisualFlagsLocation() As Long Sub SetWrapStartIndent(ByVal indent As Long) Function GetWrapStartIndent() As Long Sub SetLayoutCache(ByVal cacheMode As Long) Function GetLayoutCache() As Long Sub LinesSplit Sub LinesSplitWidth(ByVal PixelWidth As Long) Sub LinesJoin Function WrapCount(ByVal docLine As Long) As Long Sub ZoomIn Sub ZoomOut Sub SetZoom(ByVal zoomInPoints As Long) Function GetZoom() As Long Sub SetEdgeMode(ByVal EdgeMode As EdgeMode) Function GetEdgeMode() As Long Sub SetEdgeColumn(ByVal columnNumber As Long) Function GetEdgeColumn() As Long Sub SetEdgeColour(ByVal Colour As Long) Function GetEdgeColour() As Long Sub SetLexer(ByVal Lexer As LexerCode) Function GetLexer() As LexerCode Property Get Lexer() As LexerCode Property Let Lexer(RHS As LexerCode) Sub SetLexerLanguage(ByVal LexerName As String) Sub LoadLexarLibrary(ByVal LexerPath As String) Sub Colourise(ByVal startPos As Long, ByVal endPos As Long) Sub SetProperty(ByVal sKey As String, ByVal sValue As String) Sub SetPropertyB(ByVal key As String, ByVal value As String) Function GetProperty(ByVal sKey As String) As String Function GetPropertyInt(ByVal sKey As String, ByVal default As Long) As Long Sub SetKeywords(ByVal keyWordSet As Long, ByVal keyWordList As String) Function GetStyleBitsNeeded() As Long Sub StyleDefault(ByVal ForeColor As Long, ByVal BackColor As Long, ByVal fnt As Font, ByVal eolFilled As Boolean, ByVal SetVisible As Boolean, ByVal SetCase As CaseMode, ByVal SetCharset As CharSet) Sub StyleLineNumber(ByVal ForeColor As Long, ByVal BackColor As Long, ByVal fnt As Font, ByVal eolFilled As Boolean, ByVal SetVisible As Boolean, ByVal SetCase As CaseMode, ByVal SetCharset As CharSet) Sub StyleBraceLight(ByVal ForeColor As Long, ByVal BackColor As Long, ByVal fnt As Font, ByVal eolFilled As Boolean, ByVal SetVisible As Boolean, ByVal SetCase As CaseMode, ByVal SetCharset As CharSet) Sub StyleBraceBad(ByVal ForeColor As Long, ByVal BackColor As Long, ByVal fnt As Font, ByVal eolFilled As Boolean, ByVal SetVisible As Boolean, ByVal SetCase As CaseMode, ByVal SetCharset As CharSet) Sub StyleControlChar(ByVal ForeColor As Long, ByVal BackColor As Long, ByVal fnt As Font, ByVal eolFilled As Boolean, ByVal SetVisible As Boolean, ByVal SetCase As CaseMode, ByVal SetCharset As CharSet) Sub StyleIndentGuide(ByVal ForeColor As Long, ByVal BackColor As Long, ByVal fnt As Font, ByVal eolFilled As Boolean, ByVal SetVisible As Boolean, ByVal SetCase As CaseMode, ByVal SetCharset As CharSet) Sub SetMouseDwellTime(ByVal msTime As Long) Sub AutoCShow(ByVal lenEntered As Long, ByVal autoList As String) Sub ShowAutoComplete(ByVal autoList As String) Function ToLastSpaceCount() As Long Sub AutoCCancel Function AutoCActive() As Long Function AutoCPosStart() As Long Sub AutoCComplete Sub AutoCStops(ByVal autoList As String) Property Get AutoCSeparator() As String Property Let AutoCSeparator(RHS As String) Sub AutoCSelect(ByVal selectItem As String) Function AutoCGetCurrent() As String Sub AutoCSetCancelAtStart(ByVal bCancel As Boolean) Function AutoCGetCancelAtStart() As Boolean Sub AutoCSetFillUps(ByVal Chars As String) Sub AutoCSetChooseSingle(ByVal chooseSingle As Boolean) Function AutoCGetChooseSingle() As Boolean Sub AutoCSetIgnoreCase(ByVal ignoreCase As Boolean) Function AutoCGetIgnoreCase() As Boolean Sub AutoCSetAutoHide(ByVal autoHide As Boolean) Function AutoCGetAutoHide() As Boolean Sub AutoCSetDropRestOfWord(ByVal dropRestOfWord As Boolean) Function AutoCGetDropRestOfWord() As Boolean Sub RegisterImage(ByVal listType As Long, ByVal xpmData As String) Sub ClearRegisteredImages Sub AutoCSetTypeSeparator(ByVal separatorCharacter As Long) Function AutoCGetTypeSeparator() As Boolean Sub AutoCSetMaxHeight(ByVal rowCount As Long) Function AutoCGetMaxHeight() As Long Sub AutoCSetMaxWidth(ByVal rowCount As Long) Function AutoCGetMaxWidth() As Long Sub UserListShow(ByVal listType As Long, ByVal List As String) Property Get SelForeColor() As ULong Property Let SelForeColor(RHS As ULong) Property Get SelBackColor() As ULong Property Let SelBackColor(RHS As ULong) Property Get DefaultForeColor() As ULong Property Let DefaultForeColor(RHS As ULong) Property Get DefaultBackColor() As ULong Property Let DefaultBackColor(RHS As ULong) Property Get DefaultFont() As Font Property Set DefaultFont() As Font Sub ClearDocument Sub NewDocument Function Max(ByVal a As Long, ByVal b As Long) As Long Function Min(ByVal a As Long, ByVal b As Long) As Long Function ReadINI(ByVal sSection As String, ByVal sKeyName As String, ByVal sFileName As String) As String Function WriteINI(ByVal sSection As String, ByVal sKeyName As String, ByVal sNewString As String, ByVal sFileName As Variant) As Long Sub GetSectionsINI(ByVal sSections() As String, ByVal sFileName As String) Sub GetKeysINI(ByVal sSection As String, ByVal sKeys() As String, ByVal sFileName As String) Function DeleteKeyINI(ByVal sSection As String, ByVal sKeyName As String, ByVal sFileName As Variant) As Long Function DeleteSectionINI(ByVal sSection As String, ByVal sFileName As Variant) As Long Function ReadStyleINI(ByVal sLang As String, ByVal lStyle As Long, ByVal sFile As String, ByVal Back As Long, ByVal Fore As Long, ByVal fntName As String, ByVal fntSize As Long, ByVal Bold As Boolean, ByVal Italic As Boolean, ByVal Underline As Boolean, ByVal Visible As Boolean, ByVal eolFilled As Boolean, ByVal chCase As CaseMode, ByVal CharsSet As Long, ByVal sName As String) As Boolean Function WriteStyleINI(ByVal sLang As String, ByVal lStyle As Long, ByVal sFile As String, ByVal Back As Long, ByVal Fore As Long, ByVal fntName As String, ByVal fntSize As Long, ByVal Bold As Boolean, ByVal Italic As Boolean, ByVal Underline As Boolean, ByVal Visible As Boolean, ByVal eolFilled As Boolean, ByVal chCase As CaseMode, ByVal CharsSet As Long, ByVal sName As String) As Long Function WritePropertyINI(ByVal sLang As String, ByVal lProperty As Long, ByVal sValue As String, ByVal sFile As String) As Long Function WriteKeywordINI(ByVal sLang As String, ByVal lKeywordSet As Long, ByVal sValue As String, ByVal sFile As String) As Long Function WriteTagINI(ByVal sLang As String, ByVal lTag As Long, ByVal sValue As String, ByVal sFile As String) As Long Function SetStyleINI(ByVal sLang As String, ByVal lStyle As Long, ByVal sFile As String) As Boolean Function LanguageINI(ByVal sLang As String, ByVal sFile As String) As Boolean Function ReadLanguageStyler(ByVal sLang As String, ByVal sFile As String) As Styler Sub WriteLanguageStyler(ByVal LangStyler As Styler) Sub SetLanguageStyler(ByVal LangStyler As Styler) Function SetFixedFont(ByVal strFont As String, ByVal lSize As Long) As Variant Sub Remove(ByVal posStart As Long, ByVal posEnd As Long) Property Get EdgeMode() As EdgeMode Property Let EdgeMode(RHS As EdgeMode) Property Get EdgeColumn() As Long Property Let EdgeColumn(RHS As Long) Property Get EdgeColor() As ULong Property Let EdgeColor(RHS As ULong) Property Get MarginForeColor() As ULong Property Let MarginForeColor(RHS As ULong) Property Get MarginBackColor() As ULong Property Let MarginBackColor(RHS As ULong) Property Get MarkerForeColor() As ULong Property Let MarkerForeColor(RHS As ULong) Property Get MarkerBackColor() As ULong Property Let MarkerBackColor(RHS As ULong) Property Get FoldMarginColor() As ULong Property Let FoldMarginColor(RHS As ULong) Property Get FoldMarginHiColor() As ULong Property Let FoldMarginHiColor(RHS As ULong) Function DosExec(ByVal strAppName As String, ByVal strParams As String, ByVal lShowWindow As Long, ByVal lBufferSize As Long) As String Function WinExec(ByVal strAppName As String, ByVal strParams As String, ByVal lShowWindow As Long, ByVal lBufferSize As Long) As String Function GetProcessHandle() As Long Sub TerminateCurrentProcess Function ShellRun(ByVal sDocName As String, ByVal Action As String, ByVal Parameters As String, ByVal Directory As String, ByVal WindowState As WindowState) As Boolean Property Get AutoIndent() As Boolean Property Let AutoIndent(RHS As Boolean) Property Get ShowCallTips() As Boolean Property Let ShowCallTips(RHS As Boolean) Function LoadCallTipFile(ByVal strFile As String) As Variant Sub SetCallTips(ByVal sTips() As String) Sub GetCallTips(ByVal sTips() As String) Sub FormatRange(ByVal bDraw As Boolean, ByVal pfr As RangeToFormat) Property Get SerialNumber() As String Property Let SerialNumber(RHS As String) Function GetDocPointer() As Long Sub SetDocPointer(ByVal pDoc As Long) Function CreateDocument() As Long Sub AddRefDocument(ByVal pDoc As Long) Sub ReleaseDocument(ByVal pDoc As Long) Function MouseX() As Long Function MouseY() As Long Function KeyState(ByVal KeyCode As Long) As Long Function GetKeyState(ByVal KeyCode As Long) As Boolean Sub PrintAll Function PrintPages(ByVal startPos As Long, ByVal endPos As Long, ByVal LeftMarginWidth As Long, ByVal TopMarginHeight As Long, ByVal RightMarginWidth As Long, ByVal BottomMarginHeight As Long) As Long Function PrintPagesMeasure(ByVal startPos As Long, ByVal endPos As Long, ByVal LeftMarginWidth As Long, ByVal TopMarginHeight As Long, ByVal RightMarginWidth As Long, ByVal BottomMarginHeight As Long, ByVal NextCharPos As Long, ByVal PagesInfo() As String) As Long Function ProcessPrintPages(ByVal startPos As Long, ByVal endPos As Long, ByVal LeftMarginWidth As Long, ByVal TopMarginHeight As Long, ByVal RightMarginWidth As Long, ByVal BottomMarginHeight As Long, ByVal PrintNextCharPos As Long, ByVal PagesInfo() As String, ByVal bMeasureOnly As Boolean) As Long Function PrintPreview(ByVal TargetDC As Long, ByVal startPos As Long, ByVal endPos As Long, ByVal LeftMarginWidth As Long, ByVal TopMarginHeight As Long, ByVal RightMarginWidth As Long, ByVal BottomMarginHeight As Long, ByVal PreviewNextCharPos As Long) As Long Sub PrintPageSize(ByVal LeftMarginWidth As Long, ByVal TopMarginHeight As Long, ByVal RightMarginWidth As Long, ByVal BottomMarginHeight As Long, ByVal rtRC As RECT, ByVal rtPage As RECT) Function GetMeasure() As Long Function GetLanguageInfo(ByVal dwLCType As Long) As String Function PageSetupDialog(ByVal hWndOwner As Long, ByVal Margins As RECT, ByVal MinMargins As RECT) As Boolean Function LoadFile(ByVal sFileName As String) As Boolean Function SaveFile(ByVal sFileName As String) As Boolean Sub SplitFilePath(ByVal sFileName As String, ByVal sFile As String, ByVal sPath As String) Function GetExtension(ByVal sFileName As String) As String Function CreatePictureDC(ByVal PixelWidth As Long, ByVal PixelHeight As Long, ByVal BackColour As Long) As Long Sub DeletePictureDC(ByVal hdc As Long) Function CreatePictureFromDC(ByVal SrcDC As Long, ByVal PixelWidth As Long, ByVal PixelHeight As Long) As Picture Function HBitmapFromDC(ByVal lhDC As Long, ByVal lWidth As Long, ByVal lHeight As Long) As Long Sub PrintTextDC(ByVal hdc As Long, ByVal Text As String, ByVal LeftX As Long, ByVal TopY As Long, ByVal rightX As Long, ByVal bottomY As Long, ByVal dtFlags As Long) Sub SetBkColorDC(ByVal hdc As Long, ByVal Colour As Long) Sub ClsDC(ByVal hdc As Long, ByVal Colour As Long, ByVal PixelWidth As Long, ByVal PixelHeight As Long) Events Public Event CharAdded(ByVal Character As String, ByVal Word As String) Public Event Modified(ByVal modificationType As Long, ByVal Position As Long, ByVal length As Long, ByVal linesAdded As Long, ByVal Text As Long, ByVal Line As Long, ByVal foldLevelNow As Long, ByVal foldLevelPrev As Long) Public Event LastStepUndoRedo Public Event UpdateUI(ByVal Line As Long, ByVal Column As Long, ByVal Position As Long, ByVal TotalLines As Long) Public Event MarginClick(ByVal Modifiers As Long, ByVal Position As Long, ByVal Margin As Long) Public Event SavePointReached Public Event SavePointLeft Public Event ModifyAttemptReadonly Public Event DoubleClick Public Event StyleNeeded(ByVal Position As Long) Public Event NeedShown Public Event Painted Public Event DwellStart(ByVal X As Long, ByVal Y As Long) Public Event DwellEnd(ByVal X As Long, ByVal Y As Long) Public Event Zoom Public Event HotSpotClick(ByVal Position As Long, ByVal Modifiers As Long) Public Event HotSpotDoubleClick(ByVal Position As Long, ByVal Modifiers As Long) Public Event CallTipClick(ByVal Position As Long) Public Event AutoCSelection(ByVal wordStartPosition As Long, ByVal Text As Long) Public Event UserListSelection(ByVal wordStartPosition As Long, ByVal Text As Long) Public Event Resize Public Event GotTheFocus Public Event LostTheFocus Public Event EnterTheFocus Public Event MacroRecord(ByVal Message As Long, ByVal wParam As Long, ByVal lParam As Long, ByVal strParam As String) Public Event ProcessOutput(ByVal sText As String, ByVal lBytesRead As Long, ByVal lpExitCode As Long, ByVal Terminate As Boolean) Public Event KeyUp(ByVal KeyCode As Long, ByVal Shift As Long) Public Event KeyDown(ByVal KeyCode As Long, ByVal Shift As Long) Public Event KeyPress(ByVal KeyAscii As Long) Public Event MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) Public Event MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) Public Event MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) Public Event DblClick(ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) Public Event MouseWheel(ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) Public Event FoundText(ByVal count As Long) Public Event ReplacedText(ByVal count As Long) Public Event PagePreview(ByVal StartCharPos As Long, ByVal NextCharPos As Long, ByVal PageNum As Long, ByVal Measuring As Boolean, ByVal Cancel As Boolean) Public Event PagePrint(ByVal StartCharPos As Long, ByVal NextCharPos As Long, ByVal PageNum As Long, ByVal Cancel As Boolean) ISubclass Methods Property Get MsgResponse() As EMsgResponse Get/set how you will respond to a message. Raised whenever a message is encountered. Call the CurrentMessage property to determine what message you are currently responding to. Property Let MsgResponse(RHS As EMsgResponse) Get/set how you will respond to a message. Raised whenever a message is encountered. Call the CurrentMessage property to determine what message you are currently responding to. Function WindowProc(ByVal hwnd As Long, ByVal iMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long Raised whenever a message you have subclassed is sent. Events None PageSetupDlg Public Type PageSetupDlg lStructSize As Long ' lStructSize hWndOwner As Long ' hWndOwner hDevMode As Long ' hDevMode hDevNames As Long ' hDevNames flags As Long ' flags ptPaperSize As POINTAPI ' ptPaperSize rtMinMargin As RECT ' rtMinMargin rtMargin As RECT ' rtMargin hInstance As Long ' hInstance lCustData As Long ' lCustData lpfnPageSetupHook As Long ' lpfnPageSetupHook lpfnPagePaintHook As Long ' lpfnPagePaintHook Const lpPageSetupTemplateName ' lpPageSetupTemplateName hPageSetupTemplate As Long ' hPageSetupTemplate End Type POINTAPI Public Type POINTAPI X As Long ' X Y As Long ' Y End Type RangeToFormat Public Type RangeToFormat hdc As Long ' hdc hdcTarget As Long ' hdcTarget rc As RECT ' rc rcPage As RECT ' rcPage chrg As CharacterRange ' chrg End Type RECT Public Type RECT Left As Long ' Left Top As Long ' Top Right As Long ' Right Bottom As Long ' Bottom End Type Style Public Type Style Back As Long ' Back Fore As Long ' Fore Const FontName ' FontName FontSize As Long ' FontSize Bold As Boolean ' Bold Italic As Boolean ' Italic Underline As Boolean ' Underline Visible As Boolean ' Visible eolFiled As Boolean ' eolFiled Case As CaseMode ' Case End Type Styler Public Type Styler Lexer As Long ' Lexer Const Filter ' Filter Const Name ' Name Const File ' File Const Comment ' Comment Keywords As String ' Keywords StyleBack As Long ' StyleBack StyleFore As Long ' StyleFore StyleFont As String ' StyleFont StyleSize As Long ' StyleSize StyleBold As Long ' StyleBold StyleItalic As Long ' StyleItalic StyleUnderline As Long ' StyleUnderline StyleVisible As Long ' StyleVisible StyleEOLFilled As Long ' StyleEOLFilled StyleCase As Long ' StyleCase StyleCharsSet As Long ' StyleCharsSet StyleName As String ' StyleName Properties As String ' Properties Tag As String ' Tag End Type TextRange Public Type TextRange chrg As CharacterRange ' chrg Const lpstrText ' lpstrText End Type TextToFind Public Type TextToFind chrg As CharacterRange ' chrg Const lpstrText ' lpstrText chrgText As CharacterRange ' chrgText End Type +----------------------------------------------+ + Mewsoft(tm) Corporation + + [EMAIL PROTECTED] + + http://www.mewsoft.com + + E-Business Solutions For Everyone + +----------------------------------------------+ ----- Original Message ----- From: "Neil Hodgson" <[EMAIL PROTECTED]> To: "Discussion of the Scintilla editing component" <[email protected]> Sent: Friday, January 13, 2006 10:37 AM Subject: Re: [scintilla] Scintilla ActiveX Control Wrapper Released > mewsoft: > > > The Editawy Scintilla ActiveX Control Wrapper supports every single function > > supported by Scintilla and some are included in Property format for easy > > settings in the property browser, lots of builtin functions for searching, > > replacing, styling, folding included, Built in Find Form, Replace form, Goto > > ... > > Added to related page. > > Neil > > _______________________________________________ > Scintilla-interest mailing list > [email protected] > http://mailman.lyra.org/mailman/listinfo/scintilla-interest > _______________________________________________ Scintilla-interest mailing list [email protected] http://mailman.lyra.org/mailman/listinfo/scintilla-interest
