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
          主站蜘蛛池模板: 即墨市| 安义县| 珲春市| 汉寿县| 额敏县| 新蔡县| 曲麻莱县| 五寨县| 宣武区| 乌鲁木齐县| 七台河市| 固原市| 温宿县| 始兴县| 凉城县| 英德市| 苏州市| 独山县| 广安市| 肥东县| 新平| 德安县| 库车县| 五原县| 栖霞市| 马龙县| 民丰县| 新竹县| 阳城县| 乐平市| 郧西县| 宜州市| 清镇市| 天柱县| 宣威市| 绥江县| 古丈县| 闸北区| 财经| 钟山县| 文成县|