首页 > TAG信息列表 > DelphiX
DelphiX 中的颜色 问题
1，使用 DelphiX 7 的时候，颜色输出 不正常。 DXDraw1.Surface.Fill($FF0000) ，应该是红色，但是实际不是的，是蓝色。这个参数 是 devcolor:integer 应该是个 32位的整数，通过 D7 查到了 delphiX 中的颜色定义是 TRGBQuads然后 看 delphiX的 HELP， TRGBQuads is arry 255 of TRGBQuad然后Delphi 与 DirectX 之 DelphiX(86): TDIB.DrawOn();
Delphi 与 DirectX 之 DelphiX(86): TDIB.DrawOn(); 本例效果图: 代码文件:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXDelphi 与 DirectX 之 DelphiX(85): TDIB.DrawTo();
Delphi 与 DirectX 之 DelphiX(85): TDIB.DrawTo(); 本例效果图: 代码文件:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaintBox1: TDXDelphi 与 DirectX 之 DelphiX(84): TDIB.InitLight()、DrawLights();
Delphi 与 DirectX 之 DelphiX(84): TDIB.InitLight()、DrawLights(); 本例效果图: 代码文件:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm)Delphi 与 DirectX 之 DelphiX(78): TDIB.AntialiasedLine();
Delphi 与 DirectX 之 DelphiX(78): TDIB.AntialiasedLine(); 本例效果图: 代码文件:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DIB, StdCtrls; type TForm1 = class(TForm) DXPaint