Knowledge Base

KB10576 - Protect against showing the layer properties dialog box.

Using Delphi:

Assign an empty body handler to the OnShowDialog procedure.


Using VB6:

Private Sub XGISControlLegend1_OnShowDialog(translated As Boolean, ByVal Layer As Object)
;translated = True
End Sub


Using VB.NET:

Private Sub XGIS_ControlLegend1_OnShowDialog(ByVal sender As Object, ByVal e As AxTatukGIS_DK.IXGIS_ControlLegendEvents_OnShowDialogEvent) Handles ControlLegend.OnShowDialog
;e.translated = True
End Sub

Created: October 07, 2004, Modified: September 10, 2015