MainMenu

← →
newhite © (2005-12-18 15:25) [0]

Все пункты MainMenu по умолчанию обзываются: N1, N2, ... N10...
Но когда я хочу сделать N6.visible:=true; то выходит ошибка: [Error] Unit4.pas(58): Undeclared identifier: "N6". Как по другому это сделать?

← →
Profi © (2005-12-18 15:34) [1]

newhite © (18.12.05 15:25)
Код модуля, пожалуйста.

← →
newhite © (2005-12-18 15:41) [2]

Какого модуля.
Это?
procedure TVhodForm.Button1Click(Sender: TObject);
begin
if (Edit1.Text="enter46") and (edit2.Text="111111") then
N6.visible:=true;
end;

← →
з. танька (2005-12-18 15:45) [3]

необъявленный идентификатор. либо объекта N6 нету, либо из метода TVhodForm.Button1Click его не видно.

← →
з. танька (2005-12-18 15:46) [4]

проверь, может ты его переименовал.

← →
newhite © (2005-12-18 16:09) [5]

Точно, объект N6 относится к другой форме.
Ситуация такая:
Есть GlavForm с MainMenu1:
<Файл Данные Справка>
||
<Вход в систему>

Вход в систему это VhodForm с двумя эдитами и кнопкой ОК.
При создании формы и пока не произведен вход в систему, то меню "Данные" и "Справка" visible:=false;

А дальше понять не могу. Как в обработчике кнопки ОК в VhodForm прописать чтоб после нажатия кнопки ОК в GlavForm стали доступны остальные пункты меню?

← →
з. танька (2005-12-18 16:20) [6]

нужно модуль, в котором объявлена твоя главная форма (например Unit1) указать в uses формы "вход в систему" после слова implementation. например так:

implementation
uses Unit1;

затем обращаешься к объектам первой формы через её имя:

GlavForm.N6.Visible := false;

з. танька, огромный сенькс! все работает!!!

MainMenu Найти похожие ветки