如何改变分辨率和色彩? 用这个API ChangeDisplaySettingsEx函数,用法参考MSDN,要例子请稍后 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);var M:DEVMODE;begin FillChar(M,SizeOf(DEVMODE),0); EnumDisplaySettings(nil,0,M); M.dmBitsPerPel:=8; ChangeDisplaySettingsEx(nil,M,0,CDS_RESET,nil);end;一个简单的例子,改变成256色 条形码关联的问题,高手帮帮忙啊 请教下Delphi能调用MFC写的导出类吗? 三层结构,如何在服务端看到在线情况和客户端IP等信息 能否通过编写程序来控制CPU的占用率??? 亏本大甩分,高手有奖 怎样用TADODataSet或TClientDataSet添加字段? 我现在是用strtoint和try来检测文本框里的内容是否是数字,不知道还有其他好方法? SOS!!! 怎样单击一个窗体的单击按钮时,让另一个窗体的单击按钮为假。 高度困难:用TRichEdit怎样实现类似Word那样,以50%的比例编辑。 如何定议日期型变量: 请大家谈谈自己的开发/学习历程
var
M:DEVMODE;
begin
FillChar(M,SizeOf(DEVMODE),0);
EnumDisplaySettings(nil,0,M);
M.dmBitsPerPel:=8;
ChangeDisplaySettingsEx(nil,M,0,CDS_RESET,nil);
end;
一个简单的例子,改变成256色