Source position: kmemofrm.pas line 181
procedure TKMemoFrame.ACFontStrikeoutUpdate(
Sender: TObject
);