Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Приветствую, уважаемые эксперты!
Я сделал свой веб браузер в Делфи. Есть одна проблема.
подскажите пожалуйста как сделать так чтобы кнопка(btn1.enabled:=false) через два нажатия ентера стала видимой(btn1.enabled:=true)

Вопрос задал: mudak15 (статус: Посетитель) Вопрос отправлен: 24 мая 2012, 20:01 Состояние вопроса: закрыт, ответов: 1.

Ответ #1. Отвечает эксперт: min@y™

Короче, заводишь в форме поле-счётчик, ставишь в Object inspector для формы свойство KeyPreview = True, а на событие формы OnKeyPress вешаешь вот такой обработчик:

TForm1 = class(TForm)
//...
  procedure FormKeyPress(Sender: TObject; var Key: Char);
private
  FCount: Integer; // поле-счётчик (при создании формы обнуляется)
//...
end;
 
implementation
 
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13
    then Inc(FCount);
 
  if FCount = 2
    then btn1.enabled:= True;
end;
 
end.

Ответ отправил: min@y™ (статус: Доктор наук) Время отправки: 25 мая 2012, 08:17 Оценка за ответ: 5 Комментарий к оценке: спасибо

Мини-форум вопроса

mudak15 (статус: Посетитель), 25 мая 2012, 10:15 [#1]: да ник норм)) Спасиьа тебе очень

25 мая 2012, 21:53: Вопрос закрыт (решение принял автор вопроса — mudak15): есть правильный ответ

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.