Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.012 c