使用TColorListBox从Rectangle更改颜色

Question

我又来了。 我只想了解如何使用TColorListBox更改矩形（Shape）的颜色背景。 我知道这很容易，但是当我尝试为Rectangle设置一个新值时，我一直都会遇到异常。 我使用的命令如下：

Rectangle1->Fill->Color = ColorListBox1->Color;

功能：

void __fastcall TForm1::ColorListBox1Click(const TCustomListBox *Sender,
          const TListBoxItem *Item)
{
    Rectangle1->Fill->Color = ColorListBox1->Color;
}

现在错误我一直在尝试更改collor：

Access violation at address 00405628 in module 'Project1.exe'. Read of address 00000360.

调试器的另一个例外是：

First chance exception at $00405615. Exception class $C0000005 with message 'access violation at 0x00405615: read of address 0x00000360'. Process Ninterpres.exe (904)

有人可以帮助我吗？从现在开始，非常感谢！

Answer 1

你第一次写

ColorListBox1

并且第二次使用没有＆＃39; 1＆＃39;

的名称

ColorListBox->Color;

但看起来你没有初始化某个对象（因为我记得这应该由表单编辑器自动完成）因此程序会引发异常。

Answer 2

我发现了问题...... 访问冲突代码是因为多个指针具有相同的名称。 在这种情况下，我使用Rectangle1（实际上被称为Transp，我更改了名称，以便使理解更容易）作为int var和作为对象... 谢谢你的回答XD。