When I use `TOpenDialog`, after closing the program, there is an exception in the `Vcl.Forms` module.

Program I'm using:

```cpp
std::auto_ptr<TOpenDialog> OpenDialog (new TOpenDialog(this));
if ( OpenDialog->Execute() ){}

```

Exception: 'access violation at 0x008133a4: read of address 0x000000c4'

Highlighted is line: **if not FHandleCreated then**

```pascal
function TApplication.GetDialogHandle: HWND;
begin
  if not FHandleCreated then
    Result := SendMessage(Handle, CM_DIALOGHANDLE, 1, 0)
  else
    Result := FDialogHandle;
end;

```