Курсовая работа: Система управління базою даних відділу кадрів в середовищі FoxPro

SKIP -1

ELSE

thisform.command1.Enabled= .F.

ENDIF

_screen.ActiveForm.refresh()

ENDPROCPROCEDURE Click

thisform.command1.Enabled= .T.

IF EOF()=.F.

SKIP 1

ELSE

thisform.command2.Enabled= .F.

ENDIF

_screen.ActiveForm.refresh()

ENDPROCLeft = 368

Height = 25

Width = 97

Caption = "Редактировать"

Name = "Command5"PROCEDURE Click

delete

ENDPROC

Left = 181

Height = 25

Width = 73

Caption = "Добавить"

Name = "Command3"PROCEDURE Click

APPEND BLANK

ENDPROC Left = 274

Height = 25

Width = 73