Hy,<bR>
ich muss schon wieder Nerven. :-)<bR>
Ich habe eine Function die einen Menueintrag<bR>
und einen Untereintrag erstellt.<bR>
Beiden Wird jeweils eine OnCLick Funktion
zugewiesen.<bR>
<pre>
void *Menu
TMenuItem *m=(TMenuItem*)Menu;
TMenuItem *upper = FindMenu("Ansicht", m);
if (upper==NULL)
{
upper=new TMenuItem(upper);
upper->Caption = "Ansicht";
upper->Tag=0;
m->Insert(1,upper);
}
m = new TMenuItem(m);
m->Caption="Kamera";
m->Tag=(int)OpenMe;
if(m->OnClick!=NULL) ShowMessage("k");
m->OnClick = Form2->C;
if(m->OnClick!=NULL) ShowMessage("j");
upper->Add(m);
}
</pre>
Beim Haupteintrag "upper" funktioniert das auch<bR>
wunderbar nur beim untereintrag "m" nicht.<bR>
Erstelle ich von Hand im Builder ein Menu<bR>
kann ich die OnCLick funktionen nachträglich porblemlos zuweisen,<br>
nur halt nicht wenn das Untermenü Dynamisch erzeugt wurde.<bR>
<br>
<b>mfg.:</b> Andre´
ich muss schon wieder Nerven. :-)<bR>
Ich habe eine Function die einen Menueintrag<bR>
und einen Untereintrag erstellt.<bR>
Beiden Wird jeweils eine OnCLick Funktion
zugewiesen.<bR>
<pre>
void *Menu
TMenuItem *m=(TMenuItem*)Menu;
TMenuItem *upper = FindMenu("Ansicht", m);
if (upper==NULL)
{
upper=new TMenuItem(upper);
upper->Caption = "Ansicht";
upper->Tag=0;
m->Insert(1,upper);
}
m = new TMenuItem(m);
m->Caption="Kamera";
m->Tag=(int)OpenMe;
if(m->OnClick!=NULL) ShowMessage("k");
m->OnClick = Form2->C;
if(m->OnClick!=NULL) ShowMessage("j");
upper->Add(m);
}
</pre>
Beim Haupteintrag "upper" funktioniert das auch<bR>
wunderbar nur beim untereintrag "m" nicht.<bR>
Erstelle ich von Hand im Builder ein Menu<bR>
kann ich die OnCLick funktionen nachträglich porblemlos zuweisen,<br>
nur halt nicht wenn das Untermenü Dynamisch erzeugt wurde.<bR>
<br>
<b>mfg.:</b> Andre´
Comment