Попробуй так...
Код:
var//объявляешь глобальную переменную
visible : boolean;
onFormActivate//активация формы
begin
visible := true;//инициализация переменной
Edit.Visible := true;//видимость едита
end;
onButtonClick//клик кнопки
begin
if visible = true then begin//если переменная правда то
Edit.Visible := true;//делаем едит видимым
visible := false;//переменную для дальнейшего использования ложь
end
else begin//если переменная ложь
Edit.Visible := false;//то все наоборот
visible := true;
end;
end; |