project project1.exe raised exception class Ereaderror with message 'property co

project project1.exe raised exception class Ereaderror with message 'property color_r does not exist'.process stopped. use step or run to continue(200分)<br />如题目所示，我在做的控件中应用时出的。。不知如何解决。。
project project1.exe raised exception class Ereaderror with message 'property color_r does not exist'.process stopped. use step or run to continue
TLD = class(TGraphicControl)
private
{ Private declarations }
Ftimer:Ttimer;
Fcolor:tcolor;
Fcolor_r: tcolor;
Fcolor_x: tcolor;
FInterval: integer;
Fenable: boolean;
procedure Setcolor_r(const Value: tcolor);
procedure Setcolor_x(const Value: tcolor);
//timer变换颜色过程
procedure TimerProc(Sender:Tobject);
procedure SetInterval(const Value: integer);
procedure Setenable(const Value: boolean);
protected
{ Protected declarations }
public
{ Public declarations }
constructor create(AOwner : TComponent);override;
procedure paint;override;
destructor Destroy;override;
published
{ Published declarations }
property color_r:tcolor read Fcolor_r write Setcolor_r;
property color_x:tcolor read Fcolor_x write Setcolor_x;
property Interval:integer read FInterval write SetInterval;
property enable:boolean read Fenable write Setenable;

end;

是不是你的 Fcolor_r 没有初始化啊

怎么初始化呀

我 很急得
大家帮帮忙

color_r 属性没找到,是否你的系统里有多个版本的组件啊?
检查一下你的搜索路径, 安装的组件bpl什么的, 如果是设计期报错,那么只管保存,下次打开就不会错了.通常是版本的问题

我改了一点东西就不报错了。
但我不明白怎么会出这样的错误
以前也是这么做但没错

代码上看不出有问题啊。

color_r你定义了没有？

1、关闭delphi或注销一次试试。
2、查看Tcolor所在的父类有没有不小心被你删了。

我都定义了，且重起delphi和重新安装了控件都不好用

在你使用控件的工程中，找到TLD,然后Ctrl+鼠标左键 跟踪到控件源文件，然后看找到的这个源文件里有没有那个color_r属性。如果有，重新builld一下工程。
这种情况肯定是你想象中的控件和程序中实际调用的控件不是同一个文件造成的。

这是我自己写的控件
我在写的时候边写边用程序调试。就出错
后来我改了控件集的名
也不好用

那程序实际调用的控件是放在什么地方呢？？？？

存在多版本的dcu

好像是我用的那个控件包以前用过。删除了再重新编译一下就可以了。。
欢迎大家继续讨论有什么好的解决办法

多人接受答案了。