易截截图软件、单文件、免安装、纯绿色、仅160KB

Delphi 2010下强制类型转换的错误

下面的代码在Delphi 7里都好好的，但Delphi 2010下就是报错:
[DCC Error] sgr_def.pas(720): E2089 Invalid typecast
----------
Tsp_ShiftKeys=set of (ssShift, ssAlt, ssCtrl);

fZoomShift: TShiftState;

procedure Tsp_XYPlot.SetZoomShift(const V:Tsp_ShiftKeys);
begin
fZoomShift:=[ssLeft]+TShiftState(V);
end;

D2010的强制转换有什么新的限制吗？
改这样试试：
Tsp_ShiftKeys=set of (ssShift, ssAlt, ssCtrl);

fZoomShift: TShiftState;

procedure Tsp_XYPlot.SetZoomShift(const V:Tsp_ShiftKeys);
begin
fZoomShift:=[ssLeft]+TShiftState(Ord(V));
end;

不过你两个地方都用TShiftState，为什么不直接用TShiftState而要自己定义一个类似的Tsp_ShiftKeys
我试过fZoomShift:=[ssLeft]+TShiftState(Ord(V))，也不行。
这个是SGraph源码里的。
升级到D2010就很晕，一堆错误提示
我只知道这些：
2010中普遍采用了unicode编码，你可以使用sizeof看看，SizeOf(TShiftState)在2010中长度是2，在D7中是1，所以转换时会有问题
所以将代码升级到2010还是有些麻烦的，比如char，pchar都要按照宽字符处理
确实不行，不过Tsp_ShiftKeys已经包含了(ssShift, ssAlt, ssCtrl); 为啥还要自己定义
引用
我只知道这些：
2010中普遍采用了unicode编码，你可以使用sizeof看看，SizeOf(TShiftState)在2010中长度是2，在D7中是1，所以转换时会有问题
所以将代码升级到2010还是有些麻烦的，比如char，pchar�


相关问答：

Python中的Unicode在Delphi如何还原成Gb2312？

已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试

在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......

DELPHI这种情况怎么办？ - Delphi / Windows SDK/API

就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......

delphi动态数组如何去掉一个元素

procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 个字节的长整形指针
begin
P:=PLongint(A);// 取的 A 的 ......

请教下，用DELPHI做SOHU的 - Delphi / 非技术区

一般都是怎么接活的？
收入怎么样
sohu？soho？

sohu 可能是small office house unit
小办公室，把家变成单位。

去威客网啊,很多个呢,还有外包的网站

学习学习。

现在Delphi做东西不行了,处于淘汰状 ......

delphi绘图

请教一个问题，现在有一项目需要绘制曲线图，
要求：（可以任意选择横坐标（时间）范围画出对应的数据曲线，纵坐标自动优化设置(也可手工选择)，可以在任意时间段内放大、缩小图形，某具体数据点的定位及此数据点的 ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号