Hi
hab auf dem Computer kein Delphi
aus dem Gedächtnis: issyntax ist die Variable für die Erkennung (global)
Delphi-Quellcode:
var chr: Char; str: String; loop: Integer
begin
str := RichEdit...(weiß nicht mehr genau)
for loop := 1 to length(str) do
begin
chr := str[loop];
case chr of
'?': begin issyntax := not issyntax; str[loop].Font.Color := clGreen; end;
else: if issyntax then str[loop].Font.color := clGreen;
end;
end;
kommt ímmer eine Fehlermeldung bei str[loop].font.color: Record oder... erforderlich
Hoff es ist alles so wie ichs gemacht habe
mfg ösichemiker