这次捉了老妈陪我去，那天下午没人有时间陪啊，哈哈！本来叫了老爸的，可惜到最后点都不肯去，顽固！
这次去了石岐大地影院那里去看，35元票票，不过结果这次进去看阿凡达电影失望，虽然都是3D的，不过说实话，效果真的比大信新都汇5楼那边的金逸国际电影城差，当然是3D效果差啦，原来不同的电影院效果不同的，听说标准的IMAX屏幕看3D阿凡达的话，效果非常好，但我不知道金逸国际电影城的那个是不是，不过大地影院的确实太差！
老妈说不好看，因为她喜欢看情情爱爱的，不过她说3D效果几好，尤其是当那催泪弹设到那棵纳威人的大树时，她说有闪开的冲动，哈哈！如果到大信那边，阿妈会惊叹什么呢！
上次我到大信那边看时看剧情的，所以今次想留意下画面的效果，谁知道大地影院不如金逸国际电影城，失望！
不过算了，不想看第三次了，等阿凡达DVD出时再收藏吧！
用delohi编程，用到tlist链表的排序，从大富翁www.delphibbs.com哪里找来的，经自己改进。
原来的是
function mycp(tp1,tp2: FMyList): Integer;
begin
if (tp1^.fa1 > tp2^.fa1) then
Result := 1
else if (tp1^.fa1 = tp2^.fa1) then
Result := 0
else
Result := -1;
end;
用这代码后，排序有问题：
输出结果：
//排序前输出
5 11
1 115
5 5
3 10
3 2
*********
//排序后输出
1 115
3 10
3 2
5 11
5 5
为了令第二行也能排序，于是改进如下：
function mycp(tp1,tp2: FMyList): Integer;
begin
if (tp1^.fa1 > tp2^.fa1) then
Result := 1
else if (tp1^.fa1 = tp2^.fa1) then
begin
if (tp1^.fa2 > tp2^.fa2) then
result:=1
else if (tp1^.fa2 = tp2^.fa2) then
Result := 0
else
result:=-1;
end
else
Result := -1;
end;
这次排序后：
1 115
3 2
3 10
5 5
5 11
调用： biaolist.Sort(@mycp);
biaolist是我定义的tlist
参考网址： http://www.delphibbs.com/delphibbs/dispq.asp?lid=1463137
脑子一片空白，无高兴的感觉，其实真的不喜时间走得这么快，因为自己行动太慢了啊！
一年希望一年，明年唔知又会变成点，正所谓有一因才有果，看看明年能做些什么，年底会结出什么的果了!
路过的都祝愿元旦快乐，所有人身体健康，除了坏人和得罪我的人外……
应该说这几天都在等待，等待什么，等待上证指数重新站上20日均线！现在以20日均线作为参考买卖，今天上证指数已经站上去了！
买股票应该是在赢面比较大时才操作嘛！以20日均线作为赢面的标准，不过现在已经升了几日了，等待回调再考虑买入，现在买入风险高，要掌握节奏，追涨杀跌节奏应该错误吧…
等啊……忍啊……观察……实验……等待……
