DephiX的控件For Delphi 6在那里有下载?或者是做DirectX的资料Give Me?发到[email protected] 我有For Delphi6的DirectX的库文件,而且我已经试用过了DirectDraw的部分,没有问题,你有时间可以自几个类把它封装一下,你要不要? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 summernightrain(夏夜雨):要!我收到后,是一下,送你100分!还有吗?每个100分!我可有几千份呢! 我刚学directx,能不能来个调用你那些库的实例? 我也要一份:[email protected] ,收到之后另开帖子加100! to z_x_b(长弓落日金沙丘) :你要的马上发。好的,等一下,我写个例子出来,大概在下午3点前贴出。 先将DirectX的库文件放在制定目录下,然后再Delphi中设置Search目录中加入这个DirectX目录。 由于没有时间再加上最近决定改用C++写DirectX程序,Delphi下的已经生疏很多,只好写个简单的例子给你了。 用DirectX设置显示模式的例子。严格的说这个例子并不好,一般来说如果你要用Delphi写游戏的话,最好是仿照VC++中DirectX的例子,自己写代码定义消息循环创建窗口。具体结构可以参考SDK中的例子。unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DirectDraw;type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1; g_pDD:IDirectDraw7; // DirectDraw 对象 TextSurface:IDirectDrawSurface7; //表面对象 implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);var ddsd:TDDSURFACEDESC2;begin // 建立DirectDraw对象 if DirectDrawCreateEx( nil, g_pDD, IID_IDirectDraw7, nil ) <> DD_OK then begin ShowMessage('DirectDrawCreate Failed'); Exit; //Failed end; // 设置与窗口的协调等级 g_pDD.SetCooperativeLevel( Handle, DDSCL_EXCLUSIVE or DDSCL_FULLSCREEN ); // 设置显示模式 if g_pDD.SetDisplayMode( 320, 240, 8, 0, 0 )=DD_OK then ShowMessage('设置显示模式成功!');end;关于DirectX在Delphi中详细用法,可以参考一套For Delphi 5的控件代码(如果你没有我也可以发给你,这套控件很不错可惜只能在 Delphi 5 中使用)和Microsoft DirectX SDK(和C++对照着看)。 程序中要定义类和对象,并且要使用类和对象!!! 因为程序的目的就是为了展现面向对象的特点和优点!!!假定: 对一家公司的员工进行管理:包括人员名字,出生日期,加入公司的年份,那个部门(用ring0---ring9表示10个部门) ,工资标准等(多多不限)要求有对(假如有员工改名, 可以实现改名, 尽管使用中不常见, 但主要是为了实现面向对象思想)(更改工资标准)(开除员工和增加员工)(通过工龄即加入公司的时间来对员工进行排序, 同一年的可随便排)(通过部门的对员工排序, 个部门的集中在一起显示,譬如ring0的排了下了跟着就是全是ring1部门的)请兄弟们快点回帖, 把源代码和程序发给我, 搞定后就给200分!!!这是我期末考试的题目, 兄弟们要快快快!! 我的email : [email protected] summernightrain(夏夜雨) :没有收到,麻烦再发一份![email protected]谢谢!! summernightrain(夏夜雨)有没有directx的帮助!不要跟我说msdn!!太多了!!!而且不知从那些函数开始调用!! 建议你去买一本书《Windows游戏编程大师技巧》(作者:Andre Lamothe),这本书系统的讲了Windows编程基础,DirectX和2D基础,游戏编程技术和数据结构,多线程编程,人工智能,物理建模。还有一张配套光盘。这本书是以C++为基础的。你到书店去看看应该有买的,我还没有看到有电子版的。 summernightrain(夏夜雨)昨天刚去书店,买了本opengl,等过几天再去看看!非常感谢!如果还有什么好的资料,...过几天,就加分!Thank you Very Much! 有关DLL文件的调试! 可以显示目录同时显示目录下面的文件的控件是什么? 关于DBGridEH的棘手问题! --关于单元格颜色控制显示的问题!(100分双手奉) dxdbgrid中如何把重复记录合并 请问如何得到系统中所有文件夹和文件(包括隐藏文件) 求救 一个图像显示的问题 !!急 编写控件中的问题 从Clientdataset往listview里插入数据时,引起的listview的闪烁。怎么解决。 delphi到底是什么?编程语言还是IDE?干什么用的?有没有中文版可下载? 开发自已的构件的问题?? TClientDataSet问题 小問題,都來幫幫我好嗎?
要!我收到后,是一下,送你100分!
还有吗?每个100分!
我可有几千份呢!
由于没有时间再加上最近决定改用C++写DirectX程序,Delphi下的已经生疏很多,只好写个简单的例子给你了。 用DirectX设置显示模式的例子。严格的说这个例子并不好,一般来说如果你要用Delphi写游戏的话,最好是仿照VC++中DirectX的例子,自己写代码定义消息循环创建窗口。具体结构可以参考SDK中的例子。unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DirectDraw;type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;
g_pDD:IDirectDraw7; // DirectDraw 对象
TextSurface:IDirectDrawSurface7; //表面对象
implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
var
ddsd:TDDSURFACEDESC2;
begin
// 建立DirectDraw对象
if DirectDrawCreateEx( nil, g_pDD, IID_IDirectDraw7, nil ) <> DD_OK then
begin
ShowMessage('DirectDrawCreate Failed');
Exit; //Failed
end; // 设置与窗口的协调等级
g_pDD.SetCooperativeLevel( Handle, DDSCL_EXCLUSIVE or DDSCL_FULLSCREEN ); // 设置显示模式
if g_pDD.SetDisplayMode( 320, 240, 8, 0, 0 )=DD_OK then
ShowMessage('设置显示模式成功!');
end;关于DirectX在Delphi中详细用法,可以参考一套For Delphi 5的控件代码(如果你没有我也可以发给你,这套控件很不错可惜只能在 Delphi 5 中使用)和Microsoft DirectX SDK(和C++对照着看)。
假定: 对一家公司的员工进行管理:
包括人员名字,出生日期,加入公司的年份,那个部门(用ring0---ring9表示10个部门) ,工资标准等(多多不限)
要求有对(假如有员工改名, 可以实现改名, 尽管使用中不常见, 但主要是为了实现面向对象思想)(更改工资标准)(开除员工和增加员工)(通过工龄即加入公司的时间来对员工进行排序, 同一年的可随便排)(通过部门的对员工排序, 个部门的集中在一起显示,譬如ring0的排了下了跟着就是全是ring1部门的)
请兄弟们快点回帖, 把源代码和程序发给我, 搞定后就给200分!!!
这是我期末考试的题目, 兄弟们要快快快!!
我的email : [email protected]
[email protected]
谢谢!!
不要跟我说msdn!!
太多了!!!
而且不知从那些函数开始调用!!
非常感谢!
如果还有什么好的资料,...
过几天,就加分!
Thank you Very Much!