我在编写一个程序时遇到的问题:
我用Delphi6在XP下把Form框做成透明形式也就是只显示image控件里的图片。
我又在里面建立了一个image控件,我现在要用鼠标拖动新建的image控件在一个自定义的范围内。但遇到问题,当鼠标指到新建的image控件拖动时却不能响应form.onmousemove的事件,我的新建的image控件是在背景image控件的上面,请问大家应该怎样解决呢?
另外一个问题是:如果我现在建立了一个枚举型的变量,我现在要循环枚举里的n个量这么多次,每次都把第n个以字符串的形式传给别的变量。应该怎样呢?假设我并不知道枚举里有多少个量。
最后一个问题是,在对文本文件进行操做时,比如读取,比如现在已经读到文件末尾了,我现在想从文件开头开始读那怎样可以定位到文件开头呢?
我用Delphi6在XP下把Form框做成透明形式也就是只显示image控件里的图片。
我又在里面建立了一个image控件,我现在要用鼠标拖动新建的image控件在一个自定义的范围内。但遇到问题,当鼠标指到新建的image控件拖动时却不能响应form.onmousemove的事件,我的新建的image控件是在背景image控件的上面,请问大家应该怎样解决呢?
另外一个问题是:如果我现在建立了一个枚举型的变量,我现在要循环枚举里的n个量这么多次,每次都把第n个以字符串的形式传给别的变量。应该怎样呢?假设我并不知道枚举里有多少个量。
最后一个问题是,在对文本文件进行操做时,比如读取,比如现在已经读到文件末尾了,我现在想从文件开头开始读那怎样可以定位到文件开头呢?
你到作 为 背景的Image上的OnMouseMove事件中写代码或许可以实现~~
要把你的image控件置前!
TEnumSample = (esA, esB, esC, .....esX);
var
es: TEnumSample;
begin
for es := Low(TEnumSample) to High(TEnumSample) do
begin
......
end;枚举型的变量是得不到他的字符串形式的,比如说 es := esA,将 es 转化为 'esA' 是不行的,只能用数值。不过可以这样做一个常量数组实现。
const
TEnumSampleStr: array [TEnumSample] of string
= ('esA', 'esB', 'esC', ....., 'esX');
引用的时候用这样的方法:
es := esA;
ShowMessage(TEnumSampleStr[es]); // 得到的结果是字符串 'esA'