[UnrealFire]

MainEdit - Поле ввода вывода. Объект TEdit.
PMemSave - Procedure выполняется по нажатию клавиши MS (Memory Save).

Вот например у меня процедура по нажатию клавиши C (Clean);

Код:

procedure TForm1.PCE(Sender: TObject);
begin
  MainEdit.Text:='0';
  AEdit.Text:='0';
  BEdit.Text:='0';
  CEdit.Text:='0';
  X1Edit.Text:='0';
  X2Edit.Text:='0';
  {CE}
end;

На неё он не ругается, а она по принципу такая-же.

О чёрт, лох я... TForm1 забыл добавить... Сори за очередной глупый вопрос.