![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сё, то [D6, Win2k]
Kair © (2003-01-20 20:24:00)Создаю (динамически) TMainMenu или TPopupMenu, но их не видно на форме. Вероятно потому, что не задаю им Items. Как это сделать?
Anatoly Podgoretsky (2003-01-20 21:21:00) [1]Ты чего, обращаешься к неинициализированной переменной или к чужой.
Kair (2003-01-20 21:14:00) [2]>gsu ©
Спасибо
gsu (2003-01-20 21:10:00) [3]mm1:=TMainMenu.Create(Form1);
mi:=TMenuItem.Create(mm);
mi.Caption:="ff";
mm1.Items.Add(mi);
menu:=mm1;
Kair (2003-01-20 21:08:00) [4]var
Form1: TForm1;
mm1: TMainMenu;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
mm1:=TMainMenu.Create(Self);
Form1.Menu:=mm1;
end;
end.
gsu (2003-01-20 20:58:00) [5]а элемент создал ?
Kair (2003-01-20 20:56:00) [6]>gsu ©
Присвоил
gsu (2003-01-20 20:50:00) [7]>> Создаю (динамически) TMainMenu или TPopupMen
А ты их форме присвоил ?
Kair (2003-01-20 20:48:00) [8]>Jacobs ©
Нет, не из-за этого у меня bsSizeable
Jacobs (2003-01-20 20:44:00) [9]По-моему это от того что у формы BorderStyle стоит значение
bsDialog
Kair (2003-01-20 20:41:00) [10]?