[an error occurred while processing this directive]
ЭВМ четвертого поколения (fourth-generation computer). Основой ЭВМ являются большие интегральные схемы (СБИС) и микропроцессоры, выпуск которых был начат в 1971 г. фирмой Intel (США). В 1977 г. В США молодые предприниматели С. Джобсон и С. Возник ор-ганизовали фирму по изготовлению недорогих персональных компьютеров (ПК), предназначенных для широкого круга пользователей. Эти ПК, названные APPLE («Яблоко»), послужили основой для широкого распространения ПК во всем мире.

Другие методы

Порядок вызова наследуемого метода зависит от конкретного алгоритма. В большинстве случаев наследуемый метод вызывается первым, но могут использоваться и другие последовательности. Особое значение имеет вызов наследуемого обработчика событий HandleEvent. В самом общем виде структура нового обработчика будет такой:

Procedure MyObject.HandleEvent(var Event: TEvent); 

begin

{Изменение наследуемых свойств} 

{Вызов наследуемого обработчика} 

{Добавление новых свойств} 

end;

Таким образом, вначале Вы должны запрограммировать те действия, которые изменяют стандартное поведение перекрытого обработчика, затем вызвать его и, наконец, осуществить новую обработку событий. Разумеется, любая из этих трех частей может отсутствовать. Например, стандартный обработчик TDialog.HandleEvent лишь расширяет свойства наследуемого метода TWindow.HandleEvent, добавляя в него обработку событий от клавиатуры и событий-команд:

Procedure TDialog.HandleEvent(var Event: TEvent); 

begin

Inherited HandleEvent(Event);

case Event.what of

evKeyDown:

.....

evCommand:

.....

end ; 

end;

Этот обработчик перехватывает все события от клавиатуры и мыши, в том числе и нажатие на клавишу Tab. Если Вы хотите обработать событие от клавиши Tab особым способом, Вы должны перехватить это событие до вызова стандартного обработчика. Например:

Procedure TNoTabsDialog.HandleEvent(var Event: TEvent);

begin

if (Event.What = evKeyDown) then 

if (Event.KeyCode = kbTab) or

(Event.KeyCode = kbShiftTab) then 

ClearEvent(Event); Inherited HandleEvent(Event); 

end;

На шаге определения конечных результатов следует четко сформулировать требования к результатам решения. В нашем примере, эти требования можно описать следующим образом: получить траекторию движения снаряда в зависимости от времени его полета. Следующий шаг – определение формы выдачи результатов. Для нашего примера это мо-жет быть либо статическое графическое представление, либо табличная форма, либо ди-намическая картинка (видеоизображение полета).
[an error occurred while processing this directive]