B bbw Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-03 #1 好像OPENGL也就几个dll,怎样不用这些东西就可以直接写屏? 或者问题是:怎样写个类似OPENGL可以直接写屏的东东? 不懂图形,初次提问,请高手不要笑话。
B bbw Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-17 #3 在OnPaint中操作TCanvas?这是通过GDI写屏,我想[red]直接写屏[/red]啊!
C cdyxl Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-03 #6 你也太高难度了吧! 象OPENGL那样!你只是说说吧! 我用OPENGL,但我没有想过自己写屏! 看来你比我领先了!
C catbrother Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-03 #8 可以得到屏幕的句柄,然后用GDI画。 具体我回去翻翻书[][]
B bbw Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #10 我不是高手啊~[] 就是因为速度上的原因,才不用GDI,但又不想用OPENGL、DirectX,更糟糕的是,自己想 直接写屏,连从哪入手都不知,有人知道吗?
T tjj Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #13 同意楼上 只要你不怕麻烦,最快,效率最好还是汇编,学汇编吧
B bbw Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #14 给个例子吧,用汇编也好,在屏幕上画个小点,也好让我知道从哪里入手啊~
L LuJuhe Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #15 首先要能进入 ring 0 特权级,然后直接写显示缓存就行了。
张 张无忌 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #16 要写驱动罗,对了,你可以用DIRECT X吗,他干的还不错,要不然为什么那么多游戏都用 他来写现存
D ddev Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #18 行不通,否则微软根本不需要提供 DirectX/OpenGL。 如果真正要,那应该是系统级的编程了 ------- 我的猜想。
L lwluser Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-05 #20 在 {$R *.REG} 后面加入: {$D SCRNSAVE 我写的屏保} //"我写的屏保" 显示在 显示/属性 中 program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} {$D SCRNSAVE 我写的屏保} begin if hPrevInst=0 then //当前实例是唯一的 begin if (ParamCount>0) and (UpperCase(ParamStr(1))='/S') then //激活状态 begin Application.Ininialize; ...... ...... //运行屏保程序 end else begin //在这里加入设置代码 end; Application.Run; end; end.
在 {$R *.REG} 后面加入: {$D SCRNSAVE 我写的屏保} //"我写的屏保" 显示在 显示/属性 中 program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} {$D SCRNSAVE 我写的屏保} begin if hPrevInst=0 then //当前实例是唯一的 begin if (ParamCount>0) and (UpperCase(ParamStr(1))='/S') then //激活状态 begin Application.Ininialize; ...... ...... //运行屏保程序 end else begin //在这里加入设置代码 end; Application.Run; end; end.