Hola.
Una posibilidad es aprovechar el evento
OnKeyPressed del
TValueListEditor, por ejemplo:
Código Delphi
[-]
procedure TForm1.ValueListEditor1KeyPress(Sender: TObject; var Key: Char);
var
ve : TValueListEditor;
begin
ve := TValueListEditor(Sender);
if (Key = #13) and not TryStringToColor(ve.Cells[2, ve.Row]) then
begin
ShowMessage('Color no válido');
ve.Cells[2, ve.Row] := PrevValues[ve.Row-1];
end;
end;
Saludos