Source position: stddlg.pas line 252
procedure TDirCollection.PutItem(
var S: TStream;
Item: Pointer
); virtual;