Текущий архив: 2003.01.30;
Скачать: CL | DM;

Вниз

Сё, то   Найти похожие ветки 

← →
Kair ©   (2003-01-20 20:24) [0]

Создаю (динамически) TMainMenu или TPopupMenu, но их не видно на форме. Вероятно потому, что не задаю им Items. Как это сделать?

---

← →
Kair ©   (2003-01-20 20:41) [1]

?

---

← →
Jacobs ©   (2003-01-20 20:44) [2]

По-моему это от того что у формы BorderStyle стоит значение
bsDialog

---

← →
Kair ©   (2003-01-20 20:48) [3]

>Jacobs ©
Нет, не из-за этого у меня bsSizeable

---

← →
gsu ©   (2003-01-20 20:50) [4]

>> Создаю (динамически) TMainMenu или TPopupMen
А ты их форме присвоил ?

---

← →
Kair ©   (2003-01-20 20:56) [5]

>gsu ©
Присвоил

---

← →
gsu ©   (2003-01-20 20:58) [6]

а элемент создал ?

---

← →
Kair ©   (2003-01-20 21:08) [7]

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 21:10) [8]

mm1:=TMainMenu.Create(Form1);
mi:=TMenuItem.Create(mm);
mi.Caption:="ff";
mm1.Items.Add(mi);
menu:=mm1;

---

← →
Kair ©   (2003-01-20 21:14) [9]

>gsu ©
Спасибо

---

← →
Anatoly Podgoretsky ©   (2003-01-20 21:21) [10]

Ты чего, обращаешься к неинициализированной переменной или к чужой.

---

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

Текущий архив: 2003.01.30;
Скачать: CL | DM;

Наверх

Память: 0.48 MB
Время: 0.02 c