5xHs
5xHs
关注数: 8
粉丝数: 48
发帖数: 2,116
关注贴吧数: 27
0520 爱人你在哪里 尼玛的 我们这些苦逼单身 怎么愉快的过着一天
秦皇岛 那位大神 用 Nexus5 问下能不能用4G网 今天办 4G卡 坑爹了
*#*#4636#*#* 我乱点一下手机信息里的 那位好心人 截个图 我恢复一下 这样咯
难道 五儿子不支持 移动4G嘛 今天去移动办了 4G 开不起来4G 愁人
求 冉冉传奇的服务端 谁有哈 有么有 有么有
那位大神 用delphi 写过 directx 我怎么跑不去来 唉 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Direct3D9; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public function InitD3D():Boolean; { Public declarations } end; var Form1: TForm1; g_d3d: IDirect3D9; g_d3ddev: IDirect3DDevice9; implementation {$R *.dfm} function GetFormatName(ModeFormat: TD3DFormat): string; begin case ModeFormat of D3DFMT_R5G6B5: Result:= 'D3DFMT_R5G6B5'; D3DFMT_R8G8B8: Result:= 'D3DFMT_R8G8B8'; D3DFMT_A8R8G8B8: Result:= 'D3DFMT_A8R8G8B8'; D3DFMT_X8R8G8B8: Result:= 'D3DFMT_X8R8G8B8'; D3DFMT_X1R5G5B5: Result:= 'D3DFMT_X1R5G5B5'; D3DFMT_A4R4G4B4: Result:= 'D3DFMT_A4R4G4B4'; D3DFMT_A1R5G5B5: Result:= 'D3DFMT_A1R5G5B5'; D3DFMT_R3G3B2: Result:= 'D3DFMT_R3G3B2'; D3DFMT_A8: Result:= 'D3DFMT_A8'; D3DFMT_A8R3G3B2: Result:= 'D3DFMT_A8R3G3B2'; D3DFMT_X4R4G4B4: Result:= 'D3DFMT_X4R4G4B4'; D3DFMT_A2B10G10R10: Result:= 'D3DFMT_A2B10G10R10'; else Result:= 'D3DFMT_UNKNOWN'; end; end; function TForm1.InitD3D():Boolean; var AdapterCount: Integer; AdapterIdentifier: TD3DAdapterIdentifier9; DisplayMode: TD3DDisplayMode; parms: TD3DPresentParameters; ModeCount: Integer; MCount: Integer; hr: LongInt; begin g_d3d:= Direct3DCreate9(D3D_SDK_VERSION); if (g_d3d = nil) then begin ShowMessage('失败了!!!'); g_d3d:= nil; end; AdapterCount:= g_d3d.GetAdapterCount(); //Form1.Memo1.Lines.Add('视频卡数量:'+IntToStr(AdapterCount)); g_d3d.GetAdapterIdentifier(D3DADAPTER_DEFAULT, D3DENUM_WHQL_LEVEL, AdapterIdentifier); //Form1.Memo1.Lines.Add(AdapterIdentifier.Driver) ; //Form1.Memo1.Lines.Add(AdapterIdentifier.Description); //Form1.Memo1.Lines.Add(AdapterIdentifier.DeviceName); ModeCount:= g_d3d.GetAdapterModeCount(D3DADAPTER_DEFAULT, D3DFMT_R5G6B5); for MCount:= 0 to ModeCount - 1 do begin g_d3d.EnumAdapterModes(D3DADAPTER_DEFAULT, D3DFMT_R5G6B5, MCount, DisplayMode); //Form1.Memo1.Lines.Add('分辨率宽度:'+IntToStr(DisplayMode.Width)+ '分辨率高度:'+IntToStr(DisplayMode.Height)+ '分辨率刷新速度:'+IntToStr(DisplayMode.RefreshRate)+'分辨率格式'+ GetFormatName(DisplayMode.Format)); end; g_d3d.GetAdapterDisplayMode(D3DADAPTER_DEFAULT, DisplayMode); //Form1.Memo1.Lines.Add('当前分辨率宽度:'+IntToStr(DisplayMode.Width)+ '当前分辨率高度:'+IntToStr(DisplayMode.Height)+ '当前分辨率刷新速度:'+IntToStr(DisplayMode.RefreshRate)+'当前分辨率格式'+ GetFormatName(DisplayMode.Format)); parms.BackBufferWidth:= 800; parms.BackBufferHeight:= 600; parms.BackBufferFormat:= D3DFMT_R5G6B5; parms.BackBufferCount:= 1; parms.MultiSampleType:= D3DMULTISAMPLE_NONE; parms.SwapEffect:= D3DSWAPEFFECT_COPY; parms.hDeviceWindow:= Handle; parms.Windowed:= True; parms.EnableAutoDepthStencil:= False; parms.AutoDepthStencilFormat:= D3DFMT_UNKNOWN; parms.Flags:= 0; parms.FullScreen_RefreshRateInHz:= 0; parms.PresentationInterval:= D3DPRESENT_RATE_DEFAULT; hr:= g_d3d.CreateDevice(D3DADAPTER_DEFAULT, D3DDEVTYPE_HAL, handle ,D3DCREATE_SOFTWARE_VERTEXPROCESSING, @parms, g_d3ddev); if Failed(hr) then ShowMessage('shibaile'); //g_d3ddev.Clear(0,0, D3DCLEAR_TARGET,RGB(255,255,255), 0, 0); end; procedure TForm1.Button1Click(Sender: TObject); begin InitD3D(); end; end. 创建失败 ShowMessage('shibaile');
我擦 不知道怎么个情况 我移动神州行卡 现在信号相当差 有没有一样的
求 各种 老版本 装备 地图 补丁 只要是经典的版本哦 谢谢大家 能共享嘛
今天圣诞节!我才知道!祝大家圣诞节快乐 我呢在家玩蛋吧
【版本分享】我本沉默服务端(03版)+补丁 受人以鱼 那就受人以鱼 bY:5xHs
刷机危险不? tr
移动4G 山海关能办不? RT
开阔老版还能有多少人玩? 我以前玩过觉得做得不错
求 老开阔传奇的服务端 越老越好 无私奉献的亲们
转身在不 你预约小米了嘛
谁在海天学车呢 28考课三的进问点事 啥时候练灯光去阿
优先级问题 搞不懂了 #include <stdio.h> int main () { printf("%d\n", 4 * 4 / 4); printf("%d\n", 4 * (4 / 4)); return 0; } 结果 都是 4!! 第二个 应该 输出零吧?
谁办过 信用卡 能提供下 需要什么东西能办理嘛 RT
真是坑 气人
求M3资格号
吧里 有位程序猿 求认识 求交往 求师父
求这部电影 知道的大神 告诉下
求一个 苹果引擎的 服务端 361 的 也行 谢谢了 RT
求一个 苹果引擎的 服务端 残 废 没用 躺硬盘的 能开起来就行
@北堂羽羽 你是怎么了? ! 天天签到 怎么你 不干了呢?
借完钱 连电话都不接 都TM的这样? 妈的
大家认为 76SF 加内挂 还是不加好呢 RT
怀疑一个问题 移动 鼠标不放 会触发 键盘事件? procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key = word('C') then Showmessage('1'); end; 大家可以 试一下
#if #act #elseact 和 #if #say #elseasy 的区别在哪?
求一个 助理小敏的 NPC 脚本 懒的写了 谢谢
受人以鱼 那就受人以鱼 分享 03我本沉默 本套服务端 是 03年的服务端 无修改 我也是在别的地方淘的 一楼为 80盛大官方客户端 二楼为 03年我本沉默端
默默问下 修改人物出生地点 那里修改?
怀念下 哈哈
求2002年全英文传奇原版服务器端 有的给传一份 谢谢了 找的好苦啊
求本书 传奇迷进 这本书 我在小学的时候 在我朋友那里 看过现在我需要这本书 如果 谁有 借我下 卖也可以 可以联系我 @我就OK 本 人不上QQ的
看到彩虹了 ............
求教 DFM 里的 DATA 16进制图片信息怎么翻译成BMP图片呢 RT
热血传奇 是不是泄露过一个服务端啊 忘了 是多少区的了 谁有啊
浩月剑 和 法神披风 搭配也不错 上图
签到30天了呵呵
原来 佐助还是没有被洗白 呵呵
讯雷会员还有两天到期 让我怎么活 怎么活
new 在用于类是不是 创建实例 新手求解 N *pN = new N;
补 富士山
种子... 富春山居图 中国合伙人 致青春
无聊 求电影看 岛国免了
二选一 看图
求大神 帮忙 谢谢了 http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.pudn.com%2Fdownloads197%2Fsourcecode%2Fgame%2Fdetail925588.html&urlrefer=16c84be78d7dbb8ac501d13e98ac897b
怎么获取磁盘文件夹的 数量? RT
如过你的电脑上只有智能ABC 你会怎么样?
求科普 窗口最小化还原问题 hMutex := CreateMutex(nil, False, 'TForm1') ; if (GetLastError() = ERROR_ALREADY_EXISTS) then begin SendMessage(Findwindow('TForm1', nil), WM_SHOWWINDOW, 1, 1); CloseHandle(hMutex); Application.Terminate; 还原不了 怎么回事 我用ShowWindow()函数也不行 @nirendao1980 @BambooCaep
主机箱到了 怎么有种上当的感觉 挨
ShowWindow 其他窗口不好使 ... ShowWindow(Findwindow('TForm1', nil), SW_SHOW);
看书的代码 我就想睡觉 杂整!
有钱是万能的 没钱是万万不能的
借钱 换电脑
大家都转去学 机器语言吧 永远不会落后 乃至可能会成为 神话
程序更新 求大手赐教! 1.检测 程序是否用不用更新 2.有下载 无 直接启动 3.下载完更新后自己动重启本身 怎么搞! 求大手 赐教 给点思路
个人感觉 鹿丸 当火影的几率很大 我不是 鹿吹 第七班的人都很厉害 但是却少一种东西就是谋略 鹿丸有的就是这种东西! 我的推断 误骂
没意思 求带玩
首页
1
2
下一页