при выборе RadioGrup и нажатии Enter происходило действие

← →
ceval (2004-03-31 23:33) [0]

Добрый вечер всем!
Подскажите как сделать правельно ?!
Хочу сделать что бы при выборе одной из кнопок
RadioGrup и нажатии Enter происходило действие
наприм:
О .....
О......
О Отменить - при выборе "Отменить" и при нажатии Enter
закрывалась форма
написал код :
procedure TForm1.FormCreate(Sender: TObject);
begin
RadioGrup.Items.Add("..........";
RadioGrup.Items.Add("..........");
RadioGrup.Items.Add("Отменить");
end;
..............
procedure TForm.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Form1.KeyPreview:=true;
if (RadioGrup.ItemIndex=2) and (key=VK_Return) then form.Close;
Нету никакой реакции.В чем дело подскажите пажалуста!?
Большое спасибо всем за помощь!

← →
PKT (2004-04-01 03:31) [1]

Form1.KeyPreview:=true;
выставьте в Инспекторе объектов
или, хотя бы, в OnCreate.

при выборе RadioGrup и нажатии Enter происходило действие Найти похожие ветки