Hi, Mick
Each Menu Item has its own OnClick Event so you can either have a separate event for each menu item or point them all to a single one routine. If they all come together you can then find out which one was triggered by a case statement: case (Sender as TMenuItem).tag (remember to set all the Tags to different numbers, 0..255 if using in a case statement) beforehand) or something like if (Sender as TMenuItem).name = 'xxx' then ... Bobby Clarke Bob Stanton wrote: > Mick Arundell wrote: > > > > > > > > Date: Fri, 06 Jan 2006 20:52:58 -0000 > > > From: "heromed" <[EMAIL PROTECTED]> > > >Subject: New TPopUpMenu event > > > > > >How can I add an additional event to TPopUpMenu which > > would be > > >executed when any of the MenuItems were clicked on, > > and would >return > > >the MenuItem that was selected ? > > > > TMenuItem.OnClick(Sender : TObject) > > Its already there > > > > Procedure TForm1.ItemClick(Sender : TObject); > > begin > > if TMenuItem(Sender) = miFile then begin > > > > > > end; > > > > Send instant messages to your online friends > > http://au.messenger.yahoo.com > > > > > > ----------------------------------------------------- > > Home page: http://groups.yahoo.com/group/delphi-en/ > > To unsubscribe: [EMAIL PROTECTED] > > > > > > > > SPONSORED LINKS > > C programming language > > > <http://groups.yahoo.com/gads?t=ms&k=C+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=lC1PxfzvANy_Br-nPkXYTA > > <http://groups.yahoo.com/gads?t=ms&k=C+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=lC1PxfzvANy_Br-nPkXYTA>> > > > > Computer programming languages > > > <http://groups.yahoo.com/gads?t=ms&k=Computer+programming+languages&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=7XFXh-0Mon1IfLuOVlwvdg > > <http://groups.yahoo.com/gads?t=ms&k=Computer+programming+languages&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=7XFXh-0Mon1IfLuOVlwvdg>> > > > > Java programming language > > > <http://groups.yahoo.com/gads?t=ms&k=Java+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=UITodqn0qTCUcae_mpRQog > > <http://groups.yahoo.com/gads?t=ms&k=Java+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=UITodqn0qTCUcae_mpRQog>> > > > > > > The c programming language > > > <http://groups.yahoo.com/gads?t=ms&k=The+c+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=xnZC2-BzDSLhhir3MLtssg > > <http://groups.yahoo.com/gads?t=ms&k=The+c+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=xnZC2-BzDSLhhir3MLtssg>> > > > > C programming language > > > <http://groups.yahoo.com/gads?t=ms&k=C+++programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=RTzTl3BOJWbWK14CdUrO0w > > <http://groups.yahoo.com/gads?t=ms&k=C+++programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=RTzTl3BOJWbWK14CdUrO0w>> > > > > Concept of programming language > > > <http://groups.yahoo.com/gads?t=ms&k=Concept+of+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=x4ueM0tA417JDq3ckdJ9CQ > > <http://groups.yahoo.com/gads?t=ms&k=Concept+of+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=x4ueM0tA417JDq3ckdJ9CQ>> > > > > > > > > > > ------------------------------------------------------------------------ > > YAHOO! GROUPS LINKS > > > > * Visit your group "delphi-en > > <http://groups.yahoo.com/group/delphi-en>" on the web. > > > > * To unsubscribe from this group, send an email to: > > [EMAIL PROTECTED] > > <mailto:[EMAIL PROTECTED]> > > > > * Your use of Yahoo! Groups is subject to the Yahoo! Terms of > > Service <http://docs.yahoo.com/info/terms/>. > > > > > > ------------------------------------------------------------------------ > > > >------------------------------------------------------------------------ > > > >No virus found in this incoming message. > >Checked by AVG Free Edition. > >Version: 7.1.371 / Virus Database: 267.14.15/223 - Release Date: > 6/01/2006 > > > > > What I wanted was a common event for every TMenuItem. > I find that when one has a large PopUpMenu having a seperate Procedure > fow each TPopUpMenuCilick gets too unwieldly. > I prefer a comon procedure with a Case statement. > > Regards > > Bob Stanton > > > ----------------------------------------------------- > Home page: http://groups.yahoo.com/group/delphi-en/ > To unsubscribe: [EMAIL PROTECTED] > > > > SPONSORED LINKS > C programming language > <http://groups.yahoo.com/gads?t=ms&k=C+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=lC1PxfzvANy_Br-nPkXYTA> > > Computer programming languages > <http://groups.yahoo.com/gads?t=ms&k=Computer+programming+languages&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=7XFXh-0Mon1IfLuOVlwvdg> > > Java programming language > <http://groups.yahoo.com/gads?t=ms&k=Java+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=UITodqn0qTCUcae_mpRQog> > > > The c programming language > <http://groups.yahoo.com/gads?t=ms&k=The+c+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=xnZC2-BzDSLhhir3MLtssg> > > C programming language > <http://groups.yahoo.com/gads?t=ms&k=C+++programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=RTzTl3BOJWbWK14CdUrO0w> > > Concept of programming language > <http://groups.yahoo.com/gads?t=ms&k=Concept+of+programming+language&w1=C+programming+language&w2=Computer+programming+languages&w3=Java+programming+language&w4=The+c+programming+language&w5=C+++programming+language&w6=Concept+of+programming+language&c=6&s=194&.sig=x4ueM0tA417JDq3ckdJ9CQ> > > > > > ------------------------------------------------------------------------ > YAHOO! GROUPS LINKS > > * Visit your group "delphi-en > <http://groups.yahoo.com/group/delphi-en>" on the web. > > * To unsubscribe from this group, send an email to: > [EMAIL PROTECTED] > <mailto:[EMAIL PROTECTED]> > > * Your use of Yahoo! Groups is subject to the Yahoo! Terms of > Service <http://docs.yahoo.com/info/terms/>. > > > ------------------------------------------------------------------------ > ----------------------------------------------------- Home page: http://groups.yahoo.com/group/delphi-en/ To unsubscribe: [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/delphi-en/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
