Externer Lexer mit Scintilla 2.0

[i0n0s]

Hallo,
ich versuche mit Delphi einen externen Lexer für Scintilla zu schreiben. Für alte Versionen von Scintilla habe ich schon einen funktionierenden, nur wurde mit Scintilla 2.0 die Methoden geändert. Es läuft jetzt über ein ILexer-Interface und ich habe Probleme mit meiner Implementation.

Als Neuerung wird die folgende Funktion in der DLL erwartet:

Code:

ILexer *(*LexerFactoryFunction)();
LexerFactoryFunction(EXT_LEXER_DECL *GetLexerFactoryFunction)(unsigned int Index);

Meine Implementation sieht wie folgt aus:

Delphi-Quellcode:

function LexerFactory(): Pointer; cdecl;
begin
  if not Assigned(LexerSQF) then
    LexerSQF := TSQFLexer.Create;

  Result := Pointer(ILexer(LexerSQF));
end;

function GetLexerFactory(Index: Cardinal): LexerFactoryFunction; stdcall;
begin
  Result := LexerFactory;
end;

An der Stelle irritieren mich die Notwendigkeit der Kapselung des ILexer-Objektes mit dem Pointer. Wenn ich den Pointer weglasse, werden die Funktionen nicht mehr aufgerufen.

Jetzt zum eigentlichen Objekt:

Delphi-Quellcode:

  TSQFLexer = class(TLexer)
    ...
  end;

  TLexer = class(TInterfacedObject, ILexer)
    ...
  end;

  ILexer = interface(IInterface)
    function Version(): Integer; cdecl;
    procedure Release(); cdecl;
    function PropertyNames(): PAnsiChar; cdecl;
    function PropertyType(const name: PAnsiChar): Integer; cdecl;
    function DescribeProperty(const name: PAnsiChar): PAnsiChar; cdecl;
    function PropertySet(const key: PAnsiChar; const val: PAnsiChar): Integer; cdecl;
    function DescribeWordListSets(): PAnsiChar; cdecl;
    function WordListSet(n: Integer; const wl: PAnsiChar): Integer; cdecl;
    procedure Lex(startPos: Cardinal; lengthDoc: Integer; initStyle: Integer; pAccess: IDocument); cdecl;
    procedure Fold(startPos: Cardinal; lengthDoc: Integer; initStyle: Integer; pAccess: IDocument); cdecl;
    function PrivateCall(operation: Integer; pointer: Pointer): Pointer; cdecl;
  end;

In meiner aktuellen Implementation werden schon drei Funktionen des Interface aufgerufen: DescribeProperty, PropertySet und DescribeWordListSets.
Dort gebe ich die Defaultwerte zurück. Weitere Funktionen wie Lex, Fold oder gar Release werden aber nicht aufgerufen, was mir Zweifel an meiner Implementation einbringt.

Im Anhang findet ihr meine Implementation als Plugin für Notepad++.
Informationen über das ILexer findet ihr in der Scintilla Documentation:
http://www.scintilla.org/ScintillaDoc.html#LexerObjects

Es wäre schön, wenn ihr euch meine Implementation mal anschauen könntet.
Danke