Name: String;
Свойство Name возвращает название цвета.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
S: String;
Begin
s:=Panel1.Color.Name;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку в переменной «s» будет содержаться название цвета панели с наименованием «Panel1».
См. также: