Delphi-Quellcode:
Caption := '('+IntToStr(CurPosition)+') "'
+Copy(SynMemo1.Text, CurPosition-2, 3)+'"';
if Copy(SynMemo1.Text, CurPosition-2, 3) = '[b]' then
begin
SynMemo1.SelText := '[/b]';
end;
Ds ist es soweit.
Es steht aber in einem unschönen TIMER .. von daher.. das Problem, ist, wenn es im KeyUp/Down steht, kommt es doppelt