Ситуация такая:

Пишу код в procedure TForm1.FormCreate(Sender: TObject);

такой код:


А оно мне ошибку при компеляции:


Я конечно понимаю, что синтаксис ни к черту, но не могу сообразить а как правильно нужно.

А нужно что бы если поле Edit1 пустое, то кнопка BitBtn1 была неактивна.

Подскажите пожалуйста как правильно записать.   

нужно использовать оператор "=" для сравнения, а нет ":="

Уточню: ":=" - это приравнивание одного к другому.

Спасибо больше товарищи, сделал
If  Edit1.Text='' then  BitBtn1.Enabled:=true;
 откомпилировалось.

Да только результата не достиг.
Кнопка при запуске по прежнему активна.
Что-то я видать не так делаю.   

Уже тупые вопросы потихоньку бесить начинают. Так и хочется написать, куда тебе эти глаза нужно засунуть.

Это сообщение отредактировал(а) Proxin - 7.3.2010, 16:00

В свойствах кнопки надо сначала в поле Enable - False поставить..
и проверить нигде ли в коде еще активность не отображается...

!  Rodman

Proxin, бесимся и сопим в две дырочки про себя.

Предвидим следующий вопрос - а как апдейтить состояние кнопочки?
Так:


Это сообщение отредактировал(а) Proxin - 7.3.2010, 16:19

Это сообщение отредактировал(а) Qu1nt - 7.3.2010, 16:43

Не могу никак сделать.      

Прописывал код:

И в 
procedure TForm1.FormCreate(Sender: TObject);

и в
procedure TForm1.BitBtn2KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);

и в

procedure TForm1.BitBtn1Click(Sender: TObject);

Если делаю свойство кнопки  Enabled:=trut.
Кнопка некативной становиться при любом варианте.
Возвращаю обратно и и она всегда активна.        

Добавлено через 4 минуты и 8 секунд
Вот я креплю файл.

Присоединённый файл ( Кол-во скачиваний: 4 )
 ______.rar 161,34 Kb

а вам условие изменить слабо - заменить <> на = ?

Все я в конец запутался.

Наверное у меня руки не оттуда растут вот весь код:
(Я создал новый проект и на нем экспериментировавшую[code=delphi]

Не работает.

Так:


Не работает.

Так:

не работает.

Во всех этих случаях свойство Enabled на кнопке было true.

Тоже самое при False, только кнопка постоянно не активна вне зависиомти от того пишу я в Эдит чего или нет.

           

Присоединённый файл ( Кол-во скачиваний: 7 )
 0.jpg 112,59 Kb

а else добавить? событие пихать на кейап.
вообще, вам совет - почитайте для начала книжку по дельфи какую-нибудь, а потом пишите.

Я обязательно прочту книжку по делфи.
Но вот в текущей проге что не так.
Она ведь не работает.   


Я уже все переставил и else и хренелсе.




Присоединённый файл ( Кол-во скачиваний: 11 )
 1.jpg 414,43 Kb

особенно под торренты с порнушкой играми книгами умными, наверное, работается хорошо.
вот код.

кнопка неактивна, если в edit ничего нет.

Потому и не работает, что книжек не читаете.
Этот код вешать надо на Edit1.OnKeyUp

Ну торренты не торренты - это все фигня у меня качается фильм и когда он качается весь канал в мои скромные 256 килобит занят. прежде чем писать на форум я нажимаю паузу.

Но вот еще один скрин с вашим кодом:
и там же запущенная программа.

Добавлено через 8 минут и 5 секунд
Сейчас заметил одну простую вещь.
Ваш код, Proxin работает только после того как я запустив программу (курсор в Edit) нажимаю кнопку- стрелку вверх.
Тогда button1 действительно становится неактивной и активируется после ввода текста в поле.  

Добавлено через 12 минут и 55 секунд
Все, разобрался.
Даю последовательность:

На кнопку в свойстве enabled (в менюшке слева) ставим значение false.
И после этого прописываем код:

и тогда работает.

Всем, кто помогал, спасибо огромное.       

Это сообщение отредактировал(а) Student00 - 7.3.2010, 19:21

Присоединённый файл ( Кол-во скачиваний: 7 )
 0.jpg 274,25 Kb