<< Click to Display Table of Contents >> sx_Delete |
Declare Sub sx_Delete Lib "Apollo9.dll" ()
VOID FAR PASCAL sx_Delete (VOID);
Flags the current record for deletion. If sx_SetDeleted has been set to True, the record will become invisible to record movement functions (except for sx_Go).
Sub bDelete_Click ()
Dim iRetVal As Integer
iRetVal = MsgBox("Confirm Delete", 52)
If iRetVal = 6 Then
sx_Delete
End If
End Sub
// delete the current record
void CNamesForm::OnButtonDelete()
{
// confirm deletion via message box
if (AfxMessageBox((LPSTR) "Confirm delete", MB_YESNO) == IDYES)
{
sx_Delete();
// gotop and refresh the browse
m_sdebrowse->SetNumProperty("Action", BRW_ACT_GOTOP);
}
m_sdebrowse->SetFocus();
}
URL of this topic:
https://www.apollodb.com/docs/api/index_api.html?apolloapi_sx_delete.htm