Thema: Delphi Probleme mit SynEdit

Einzelnen Beitrag anzeigen

Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#4

Re: Probleme mit SynEdit

  Alt 19. Jun 2007, 14:09
So sollte das funktionieren:

Code:
TSynSampleSyn {first Identifier is considered to be the Class Name }
tk {second Identifier is considered to be the Identifier Prefix }
IdentStart '_', 'a'..'z', 'A'..'Z', '0'..'9', '=', '[', ']' { Man beachte hier die = [ ] }

TOKENTYPES
Identifier
Comment Style=[fsItalic]|Foreground=clgreen
Key Foreground=clNavy|Style=[fsBold]
HeaderInfo Style=[fsBold]
|><|

KEYS
Stamp=
Sender=
InfoType=
ClientHandle=
PhoneNumber=
AddInfoType=
Action=
|><|

KEYS HeaderInfo
[Header]
[Message]
|><|

CHARS

'A'..'Z', 'a'..'z', '_', '=', '[', ']':: Ident { Hier auch die = [ ] beachten }

BeginProc
fTokenID := IdentKind((fLine + Run));
inc(Run, fStringLen);
while Identifiers[fLine[Run]] do
Inc(Run);
EndProc

|><|

ENCLOSEDBY

Comment,BraceComment,{,},MultiLine

|><|
  Mit Zitat antworten Zitat