Monday, November 10, 2003, 2:21:35 PM, Irwan wrote: I> saya punya 2 label, lblA dan lblB I> kedua label tsb menggunakan popup menu yg sama I> bagaimana menentukan bahwa popup menu diaktifkan oleh lblA atau lblB? I> saya udah pake sender, kok gak bisa, ya?
I> saya udah coba di event OnClick-nya item popup menu & OnPopUp si popup menu. I> if Sender = lblA then I> form1.caption := 'lblA' I> else if Sender = lblB then I> form1.caption := 'lblB'; I> gak ada hasil saya liat kalo pada OnPopUp sender itu kan menu, jadi if-nya tidak ada yang masuk. gini aja coba: procedure TForm1.Label1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin form1.caption:=(sender as TLabel).name; end; rgrds, Gulut ------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/i7folB/TM ---------------------------------------------------------------------~-> Berlangganan: [EMAIL PROTECTED] Stop Berlangganan: [EMAIL PROTECTED] Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
