大哥!来回答我的问题啊!没有人理我?送分来了(220分)

  • 主题发起人 主题发起人 hezchuan168
  • 开始时间 开始时间
H

hezchuan168

Unregistered / Unconfirmed
GUEST, unregistred user!
把一个VCL控件修改成CLX控件,高手请进,不过也很简单的,对于做过的人来说已经不是问题了关键是我没做过啊各位请帮帮我吧!!

怎么把VCL的delphi控件它修改一下变成CLX控件呢?有其控件的pas
Result := Windows.GetNearestColor (ACanvas.Handle, RGB(Avg, avg, avg));
上面这句怎么改呢?因为改成CLX就没有windows了,所以也就找不到
getnearestcolor这个函数了,有没有与windows.getnearcolor对应的函数呢?
还有Color := ABitmap.Canvas.Pixels[x, y];改成CLX后,canvas也就没有pixels这个东东了
Screen.Cursors[XP_HANDCUR] := LoadCursor(Hinstance, PChar('XPHANDCUR'));
loadcursor这个东东也找不到对应的来替代啊,
 
我给发一个控件的源代码吧,给做个参考,也许你能找到解决的办法的

我已经发到你的信箱了,,你去看看吧,如有问题再也我联系吧,,


希望你早日解决你的问题,,,早日送分啊!!

我还有更多问题要问啊,,我急需分啊,,救命啊大哥
 
我已经按你说的去做了,谢谢你了
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部