Source position: dialogs.pp line 231
public procedure TOpenDialog.DoCanClose(
var CanClose: Boolean
); override;