[分享] Delphi7简单DirectUI界面源码

邓学彬 2013-07-02 07:19:36

我平常用VC++多,不熟悉Delphi,应朋友请求,写了这么个简单的界面源码,发上来大家分享.
第一次用Delphi写这样的东西,源码比较烂,抱歉.

源码下载:http://blog.csdn.net/cometnet/article/details/9227179

...全文

1611 35 打赏收藏转发到动态举报

写回复

用AI写文章

35 条回复

切换为时间正序

请发表友善的回复…

发表回复

MaJin2012 2015-06-09

打赏
举报

DirectDraw的lpDDSZBufferDest : PDirectDrawSurface; 在oXE7下面报错！是什么原因啊？

OtakuCode 2013-09-27

打赏
举报

感谢分享

nhconch 2013-09-03

打赏
举报

很好，很强大

chinawcs 2013-09-03

打赏
举报

下载了 xe编译通过效果很好。支持！以前做触摸屏程序要求界面美观除了贴图就是自绘了还有别的途径吗？

支持中文哦 2013-09-03

打赏
举报

FireMonkey全部是D2D(如果D2D不可用，则调用GDI+),MacOS系列用OpenGL自画的，效果也很绚丽，很喜欢那些各种滤镜，设计期可视化处理，用Delphi特么感觉像在用PhotoShop...

meigui 2013-09-02

打赏
举报

支持彬哥。

RayYan 2013-09-02

打赏
举报

haitao 2013-09-02

打赏
举报

看过一个vc写的dircetui程序感觉不是很好：字节数大了一点内部的工具图标有点傻大不过自从360之类的工具采用这种风格，也就成了好的界面了

邓学彬 2013-09-02

打赏
举报

引用 wy371tt1 的回复修改了一下，delphi2009可用，http://download.csdn.net/detail/wy371tt1/5913937

兔子侠客 2013-07-23

打赏
举报

VisualUI 2013-07-22

打赏
举报

感谢分享

邓学彬 2013-07-22

打赏
举报

引用 23 楼 youyidianmimang 的回复:

VC版主都来叫嚣delphi了,版主出来应战啊~~ 要是grid之类的怎么弄啊... 维他命版主

怎么谈得上"叫嚣",应朋友要求写了个简单的东西而已.

hsfzxjy 2013-07-22

打赏
举报

引用 23 楼 youyidianmimang 的回复:

VC版主都来叫嚣delphi了,版主出来应战啊~~ 要是grid之类的怎么弄啊... 维他命版主

版主好久没出现了。。

youyidianmimang 2013-07-22

打赏
举报

VC版主都来叫嚣delphi了,版主出来应战啊~~

要是grid之类的怎么弄啊... 维他命版主

oushengfen 2013-07-17

打赏
举报

版主，请问对应Delphi版本的GDIPlus，怎么去找到，谢谢！

邓学彬 2013-07-16

打赏
举报

引用 17 楼 kisshexuxia 的回复:

在DELPHI XE下能用吗？我DEMO在XE下使用报错 unit 'DirectDraw.pas'

引用 18 楼 oushengfen 的回复:

是的，我在2007下也是这样的错识，什么原因啊

请使用对应你Delphi版本的GDIPlus

oushengfen 2013-07-16

打赏
举报

感谢版主，这样的源码，真是难得，非常感谢。

oushengfen 2013-07-16

打赏
举报

是的，我在2007下也是这样的错识，什么原因啊

kisshexuxia 2013-07-15

打赏
举报

在DELPHI XE下能用吗？我DEMO在XE下使用报错 [DCC Error] DirectDraw.pas(358): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record [DCC Error] DirectDraw.pas(365): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record [DCC Error] DirectDraw.pas(375): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record [DCC Error] DirectDraw.pas(382): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record [DCC Error] DirectDraw.pas(394): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record [DCC Error] DirectDraw.pas(834): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record [DCC Error] DirectDraw.pas(836): E2154 Type 'IDirectDrawSurface' needs finalization - not allowed in variant record [DCC Fatal Error] GDIPAPI.pas(38): F2063 Could not compile used unit 'DirectDraw.pas'