Hi,
ich hab hier eine Procedure, die mir je nach Dateiendung im SynEdit den passenden Highlighter setzt.
Ich hab 15 Highlighter auf der Form. Manche haben mehr als eine Dateiendung (wie z.B. *.c, *.cpp,... bei C++).
Wie könnte man das ganze kürzen:
Delphi-Quellcode:
if (Pos('.asm', FileName) > 0) then
GetDoc.Code.Highlighter := SynAsm
else
if (Pos('.cs', FileName) > 0) then
GetDoc.Code.Highlighter := SynCS
if (Pos('.c', FileName) > 0) or
(Pos('.cpp', FileName) > 0) or
(Pos('.h', FileName) > 0) or
(Pos('.hpp', FileName > 0) then
GetDoc.Code.Highlighter := SynCpp
Das ist jetzt nur ein kleines Stück davon. Das geht so noch weiter. Wie kann man das kürzen? Geht das überhaupt?