konhon

          忘掉過去,展望未來。找回自我,超越自我。
          逃避不一定躲的過, 面對不一定最難過, 孤單不一定不快樂, 得到不一定能長久, 失去不一定不再擁有, 可能因為某個理由而傷心難過, 但我卻能找個理由讓自己快樂.

          Google

          BlogJava 首頁 新隨筆 聯系 聚合 管理
            203 Posts :: 0 Stories :: 61 Comments :: 0 Trackbacks
          procedure TForm1.Label1Click(Sender: TObject);
          var
            lPoint: TPoint;
          begin
            lPoint.X := TLabel(Sender).Left;
            lPoint.Y := TLabel(Sender).Top + TLabel(Sender).Height;
            lPoint:=ClientToScreen(lPoint);
            PopupMenu1.Popup(lPoint.X, lPoint.Y);
          end;
          posted on 2005-08-25 06:58 konhon 優華 閱讀(611) 評論(0)  編輯  收藏 所屬分類: Delphi
          主站蜘蛛池模板: 丰都县| 荆州市| 瑞安市| 舞阳县| 蕲春县| 信丰县| 茌平县| 水富县| 忻城县| 沾化县| 突泉县| 枝江市| 崇礼县| 嘉祥县| 永年县| 南充市| 恭城| 鄂托克前旗| 娄底市| 个旧市| 阜康市| 苗栗市| 延庆县| 健康| 宿州市| 黎川县| 南安市| 招远市| 伊春市| 罗源县| 承德县| 永昌县| 自贡市| 望都县| 南澳县| 噶尔县| 准格尔旗| 建始县| 亚东县| 阿拉善盟| 利津县|