|  | 
 
 | 
| 
 | |||||||
| Регистрация | << Правила форума >> | 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 ... |