|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Показать\скрыть объект на форме
Здравствуйте,помогите новичку плиз!
На форме есть Edit и кнопка.Юзер нажимает на кнопку и едит изчезает,нажимеет снова и он появляется.Спасибо! |
#2
|
||||
|
||||
Попробуй так...
Код:
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; В начале был Бит, потом Байт и только потом появилось Слово... |
#3
|
|||
|
|||
NIch, в твоём примере изчезает всё форма при нажатии на кнопку
|
#4
|
||||
|
||||
Переименуй переменную Visible на что-то другое, например Vis...мой промах...просто у формы тож есть такое свойство visible...
В начале был Бит, потом Байт и только потом появилось Слово... |
#5
|
|||
|
|||
Код:
procedure TForm1.Button1Click(Sender : Tobject); begin Edit1.Visible := Not Edit1.Visible; end; Все. |
#6
|
|||
|
|||
if edit.visible = true then
edit.visible = false else edit.visible = true Так проще!!! |
#7
|
||||
|
||||
Вообще-то lmikle дал самый короткий и правильный вариант. А писать такое:
Код:
if edit.visible = true ... Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |