Source position: framview.pas line 69
type TStringsRequestEvent = procedure(
Sender: TObject;
const SRC: ThtString;
var Strings: ThtStrings
) of object;