我在编写一个程序时遇到的问题:
我用Delphi6在XP下把Form框做成透明形式也就是只显示image控件里的图片。
我又在里面建立了一个image控件,我现在要用鼠标拖动新建的image控件在一个自定义的范围内。但遇到问题,当鼠标指到新建的image控件拖动时却不能响应form.onmousemove的事件,我的新建的image控件是在背景image控件的上面,请问大家应该怎样解决呢?
另外一个问题是:如果我现在建立了一个枚举型的变量,我现在要循环枚举里的n个量这么多次,每次都把第n个以字符串的形式传给别的变量。应该怎样呢?假设我并不知道枚举里有多少个量。
最后一个问题是,在对文本文件进行操做时,比如读取,比如现在已经读到文件末尾了,我现在想从文件开头开始读那怎样可以定位到文件开头呢?

解决方案 »

  1.   

    设置新建的Image的parent属性为formimage1.Parent:=form1;
      

  2.   

    form.onmousemove??!
    你到作 为 背景的Image上的OnMouseMove事件中写代码或许可以实现~~
      

  3.   

    我试过了不行,因为那个image在背景image上,响应不了背景image的onmousemove
      

  4.   

    你把文件读完后放哪儿了,可以从那里读嘛!
    要把你的image控件置前!
      

  5.   

    不会吧,你可以用前景image来控制窗体的嘛,为什么非用背景的?
      

  6.   

    type 
      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'