Moin Angelus,
lass' mal das self.Close nach dem ModalResult := weg.
Das setzen des ModalResult bewirkt ein Close.
[EDIT]
Wenn Du dem "Beenden" Button im
OI gleich unter ModalResult mrCancel zuordnest kannst Du auch gleich das OnClick einsparen.
[/EDIT]