[Aristarh Dark]

А на кой две формы то?
Если есть два режима работы, то создаем такой тип данных:

Код:

TWorkMode = (wmProgramming, wmWork)

в основной форме создаем поле:

Код:

...
private
...
  FWorkMode:TWorkMode
...

где-то в коде программы, это поле инициализируется и изменяется, а в реакциях на кнопки делаем так:

Код:

procedure DoubleUpButtonClick(Sender:TObject);
begin
  case FWorkMode of
    wmProgramming:что-то делать в режиме программирования;
    wmWork:что-то делать в рабочем режиме;
  end; //of case
end;

ИМХО