Delphi 7在打开时显示JUST-IN-TIME 调试器设置（如图），点确定以后，显示Debugger数据错误

Posted 2023-04-12

请问这是为什么？对我用Delphi 7编程有影响吗？另外请高手推荐一点学习Delphi 7 的教程 谢谢了~
谢谢

这个提示是当你的电脑上安装了两种以上的调试工具的时候出现的，一般来说，尽量以你使用的为主，比如：如果用的delphi，就把调试工具换成delphi的。

这个调试工具设置为哪种并不影响delphi程序的编译与运行，只有在系统运行某个程序出现程序错误的时候会出现。

Delphi 7 的教程 推荐　delphi从入门到精通 参考技术A 。。。 参考技术B 不知道

delphi DBGridEh 问题

DBGridEh的OnGetCellParams事件中
if qymst.FieldByName('spunit').AsString = 'm' then
begin
dbgrideh1.FieldColumns['pcs'].Font.Color := clred;
end
else
dbgrideh1.FieldColumns['pcs'].Font.Color := clnone;为什么当spunit <> m 的时候怎个网格都在闪

OnGetCellParams事件是会一直运行的（相当于刷新），如果你这里要当qymst.FieldByName(\'spunit\').AsString = \'m\'时才改变字体的颜色为红色，那么你完成可以设置所有字体的颜色为clnone，然后将事件改为：
if qymst.FieldByName(\'spunit\').AsString = \'m\' then
begin
dbgrideh1.FieldColumns[\'pcs\'].Font.Color := clred;
end;
这样就好了。 参考技术A 因为一直在重复赋值。当spunit <> m 的时候，字段pcs的字体颜色为空。但是你代码不该放在getcellparams事件中，建议放在DataSource的 dataChange事件中。