AnnGetAutoMenuItemEnable example for Delphi

procedure TForm1.LEADAnn1AnnEnumerate (hObject: L_HANDLE);
begin
   ShowMessage (IntToStr (LEADAnn1.AnnGetAutoMenuItemEnable (hObject, 0, ANNAUTOTEXT_MENU_DELETE)));
end;