Source position: dialogs.inc line 533
procedure THistory.RecordHistory(
const S: Sw_String
); virtual;