Сообщество Чайников

Вопрос

В Delphi есть операторы AS и IS. Как ими пользоваться?

Ответ

Операторы as и is служат для выполнения операций с типами.
Оператор is используется в выражении:
Объект is Класс
и проверяет, принадлежит ли объект указанному классу или одному из его потомков. Если да, то выражение имеет значение True, что указывает на совместимость типов. В противном случае выражение имеет значение False.

Оператор as предназначен для приведения одного типа к другому и используется в выражениях вида:
Объект as Класс
В этом выражении объект приводится к типу класса. Такое приведение типа является НЕЯВНЫМ.

Пример:

procedure TForm1.Button1Click(Sender: TObject);
begin
if (Sender is TButton) then
(Sender as TButton).Enabled := False;
end;

Димыч