Изменение видимости компонентов при SetFocus компонента Edit

@nurgamiden · Регистрация: 16.05.2012

Author24 — интернет-сервис помощи студентам

Доброго времени суток, помогите найти ошибку в программном коде

Delphi

procedure TForm22.edt13KeyPress(Sender: TObject; var Key: Char);
begin
if edt13.SetFocus
then//здесь ошибка
begin
  edt5.Visible:=False;
  edt6.Visible:=False;
  edt7.Visible:=False;
  edt8.Visible:=False;
  lbl7.Visible:=False;
  lbl4.Visible:=False;
  lbl5.Visible:=False;
end
end;

при этом такие уведомления:
[Error] Unit3.pas(175): Type of expression must be BOOLEAN
[Fatal Error] Unit2.pas(43): Could not compile used unit 'Unit3.pas'

@HanDi · 31.10.2012, 20:01

Сообщение от nurgamiden

if edt13.SetFocus
then//здесь ошибка

потому что такого условия не существует

Delphi

1 2	if edt13.Focused=true then

@FIL · 31.10.2012, 20:32

И кавычки в 13-й строке поставь.

@nurgamiden · 01.11.2012, 15:12 **[ТС]**

Благодарю!

@FIL Модератор 3490 / 2613 / 741 Регистрация: 19.09.2012 Сообщений: 7,974
	31.10.2012, 20:32	3
	И кавычки в 13-й строке поставь. 0

@nurgamiden 0 / 0 / 0 Регистрация: 16.05.2012 Сообщений: 10
	01.11.2012, 15:12 [ТС]	4
	Благодарю! 0