Вниз
Скачать: CL | DM;

Почему активна кнопка?   Найти похожие ветки 

← →
ser35   (2005-02-27 16:05) [0]

Имеется кнопка, по умолчанию неактивна, а также загружаемая форма делает ее неактивной. Но она все равно активна. Подскажите, в чем причина?
procedure TForm6.FormCreate(Sender: TObject);
begin
Button1.Enabled:=False;
end;


← →
Antonn ©   (2005-02-27 16:07) [1]

может не та кнопка?


← →
Anatoly Podgoretsky ©   (2005-02-27 16:09) [2]

А может и неактивна на самом деле. А может не стоит это делать в FormCreate форма до конца еще не загружена.


← →
begin...end ©   (2005-02-27 16:14) [3]

> Anatoly Podgoretsky ©   (27.02.05 16:09) [2]

> А может не стоит это делать в FormCreate форма до
> конца еще не загружена.

Зато уже до конца создана. Так что проблемы не вижу.


← →
Antonn ©   (2005-02-27 16:17) [4]

ser35   (27.02.05 16:05)
а FormCreate вообще выполняется?


← →
ser35   (2005-02-27 16:18) [5]

При нажатии на эту кнопку:
DataModule1.Datasource1.DataSet.Post;
И если я не редактировал определенные данные, появляется ошибочное сообщение
(Для этого я и сделал неактивной кнопку, активной которую может сделать только редактирование данных)

Вот только как это можно сделать?


← →
ser35   (2005-02-27 16:20) [6]

procedure TForm6.FormCreate(Sender: TObject);
begin
Button1.Visible:=False;
end;

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


← →
Antonn ©   (2005-02-27 16:24) [7]

ser35   (27.02.05 16:20) [6]
через поиск прогнать все юниты на наличие Button1 (TForm6 - форм наверно много...).
Создать другую кнопку и в ее ОнКлик дисаблить Button1(проверить на всякий случай :)).


← →
olookin ©   (2005-02-27 16:26) [8]

Возможно, где-то после FormCreate она делается активной?


← →
ser35   (2005-02-27 16:54) [9]

Спасибо всем. Разобрался.
На этой форме у меня был DataSourse. Потом я его решил перенести в DataModule/ Из-за этого и были проблемы.Сделал по-старому: все работает :-)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c
1-1109243441
Kostik__
2005-02-24 14:10
2005.03.13
INI-файлы


1-1109277013
XMAN
2005-02-24 23:30
2005.03.13
On(ScreenSaver)


3-1108461764
Oleg_
2005-02-15 13:02
2005.03.13
русские буквы в paradox через BDE


1-1109592246
}|{yk
2005-02-28 15:04
2005.03.13
После окончания генерации отчета Excel виснет


14-1109048573
Skier
2005-02-22 08:02
2005.03.13
Ноутбук б/у




   Наверх