TIFF Image Delete

[ScottWGast]

This is what I have so far, but I can't seem to get the TIFF image to refresh after I delete a page... if I manually reload the TIFF file, it shows that the page has been deleted.

m_hDib:=(ActiveMDIChild as TMDIChild).Tiff1.hDib;
if m_hDib>0 then
begin
MainForm.Enabled:=false;
BITiffobj:=TBITiff.Create((ActiveMDIChild as TMDIChild));
BITiffobj.DeleteTiffImage((ActiveMDIChild as TMDIChild).Caption, (ActiveMDIChild as TMDIChild).nCurrentPage, false);
BITiffobj.ReorderTiffFile((ActiveMDIChild as TMDIChild).Caption);

if BITiffobj.GetNumberOfImagesInTiffFile((ActiveMDIChild as TMDIChild).Caption) > 0 then
begin
Self.ToolsPageBackExecute(self);
Self.ToolsPageForwExecute(self);
end;

MainForm.Enabled:=true;
MainForm.SetFocus;
end;