她真的是非常漂亮,自从我喜欢上她以后,发现她已经有男朋友了,我也向她表白了,不过她对我有时真是忽冷忽热的,我都搞不懂,她到底是怎么想的,我后来就告诉她,你这样子让我感觉自己好像被人爽似的,同公司的几个mm建议我去追她,可是当我想跟她约会的时候,她说如果她应约了我会误会她给我机会,我真郁闷她这么说的,可是她又问我为什么孤独的时候会想起她,又叫我说如果离开这个公司到其它地方,也许很快就会把她忘记掉,时间可以冲淡一切!但是她也不表明她不喜欢我,让我老是觉得有机会!总之她没有结婚之前,我就有机会!兄弟们,你们觉得我应该怎么做。如何追一个有主之花呢?
解决方案 »
- 利用adouqery怎么删除不了
- labview 与delphi 开发数采系统的问题,在线等。。
- sql语句问题
- DELPHI 日期计算操作的问题?急?
- 如何把剪贴板里的BMP图片保存到JPEG对象里
- 有什么办法可以提高 ShellExecute(0, 'open', 'IEXPLORE.EXE',……) 打开网页的速度??
- 200分问一个严肃的感情问题,谢绝灌水!
- 大虾们,我的这个问题还是没有解决
- 初玩sql,偶在数据库里新建了一自己的数据仓库,为什么在表项里自动有一二十个表,这些表示干什么的//牛虻
- 在哪里可以下载CSDN论坛的问题—解答集?
- 两个字段的值合并到DBGrid中一个字段上显示的问题,同时可以在DBGrid上实现对数据库中两个字段的修改...有点难!
- 用超级终端发送指令可以,用spcomm发送同样指令就不行,为什么?
你用尽一切办法关心她,但是要少提她约会的事,尽量做到,你一提出她就能应约,你应该约她到什么地方去看电影,而不应该到什么地方去散步.
我说你怎么这么了解女人呢,没想到也是一个MM,哈哈。
有一点忠告:不要直接表白,给她拒绝你的机会,否则见面的机会都没有,你肯定后悔,我现在就是这样。
Tanswer=(money,handsome,trip....);
procedure TForm1.Formcreate(Send:TObject)
begin
timer1.interval <=1000;
end;
procedure TForm1.Timer1Timer(Send:TObject)
var
a: TAnswer;
begin
Say('I Love You, At Least 10000 years');
a := CanYouAnswerMeThisQuestion('What do you like?');
case a of
money: Say('I can give you how many you need');
handsome: Say('I can make a face-lifting operation');
trip: Say('You can trip all the world with me !');
end;
end
---请不要骂我,谢谢!
^0^
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>.B4晕蛋~~~~~~~~~~~~~~~~~~!
对于楼主你,我就一个字形容,无耻!!!!!
明明两个字嘛!! 建议楼主放弃,换一个,以免浪费宝贵的青春,忠言逆耳,苦口良药啊!