يه كد براي Popup menu ميخوام

كدي ميخوام در يه جاهايي كليك راست انجام نشه و منو هم باز نشه و يه پيغام بده مثلا در بعضي سايتها و وبلاگها

يه سوال ديگه هم هست:
چجوري ميشه يه ساعت تو برنامه داشته باشيم كه همزمان با ساعت سيستم كار كنه.

سلام
جواب سوال دوم: میتونی ساعت جاری سیستم رو با استفاده از تابع Time بگیری و داخل یه تایمر قرار بدی.
موفق باشی

با سلام

جوال سوال اول :

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if Button = mbRight then
ShowMessage('No Click Here.');
;end

اگه میخوای در جای خاصی این عمل صورت گیرد میتونی از X و Y مختصاتش رو بدی.

-----------------------------------------------------------------------------------------------------------------------------

جواب سوال دوم :

از برگه System کمپوننت Timer و از برگه Standard کمپوننت Label رو بذار رو فرم. در رویداد OnTimer کمپوننت Timer1 بنویس :

;(Label1.Caption := TimeToStr(Time

موفق باشین.

عاليه ممنونم