Source position: ognetwrk.pas line 58
type TGetFileNameEvent = procedure(
Sender: TObject;
var Value: string
) of object;