Восстановить правильные значения CMYK при изменение одного из значений

[hon]

Так вот проблема в следующем:
На форме есть четыре SpinEdit'а (вкладка Samples).
Каждое из них имеет имя: CMYKcyan, CMYKmagenta, CMYKyellow и CMYKblack.
При старте программы Value каждого элемента=0, но CMYKblack=100 (черный цвет). (это модель CMYK, а не CMYK 255!)
Задача такова, что если я поставлю скажем CMYKcyan на 10, то CMYKblack останется быть 100, что неверно, когда правильно 90.

Если быть короче то нужен код, который при изменении одного значения менял другие значения, чтобы не было таких ошибок.

[Аватар]

OnChange чем не подходит? Можно один на всех и по Sender определять откуда вызван или отдельный для каждого. Не устроит - можно в OnExit

[hon]

Сообщение от Аватар

OnChange чем не подходит? Можно один на всех и по Sender определять откуда вызван или отдельный для каждого. Не устроит - можно в OnExit

Вопрос не в этом. Я понимаю что чье значение было изменено важно. Но мне нужен именно код.

[Человек_Борща]

А че код? Сложно написать процедуру, которая принимает значение

скажем CMYKcyan на 10

и автоматически просчитывает нужные значения для остальных?

то CMYKblack останется быть 100, что неверно, когда правильно 90.

Что за набор не связанных слов?

[hon]

Сообщение от Человек_Борща

А че код? Сложно написать процедуру?

Не знаю как писать. Нет идеи как писать код.

[Человек_Борща]

О_О
[ПСЕВДОCODE]
процедура ПриветМир(Параметр1:Строка).
Начало
Компонент1.Значение = Параметр1.
Компонент2.Значение = Компонент1.Значение + 10 - 4.
Компонент3.Значение = Компонент1.Значение + Компонент2.Значение - 27 + Параметр1.
конец.
[/CODE]

Вот вам пример.

[Аватар]

Пример для 2 спинэдитов с одним обработчиком

procedure TForm1.SpinEditChange(Sender: TObject);
var xSpinEdit: TSpinEdit;
begin
  if Sender=SpinEdit1 then xSpinEdit:=SpinEdit2
                      else xSpinEdit:=SpinEdit1;
  xSpinEdit.OnChange:=nil;
  xSpinEdit.Value:=255-TSpinEdit(Sender).Value;
  xSpinEdit.OnChange:=SpinEditChange;
end;

[hon]

Мне это не нужно. Мне нужен код который восстанавливал значения CMYK. Это связано только с CMYK, тут то что у меня спинэдит, а не эдит не имеет разницы. Работа только с цветовым пространством.

Обьясняю задачу еще раз:

У вас есть 4 спинэдита. Каждый отвечает за конкретные цвет CMYK. Сейчас стоит черный цвет, тоесть 0,0,0,100. Мы увеличиваем cyan на 10. Получаем 10,0,0,100. А правильно должно быть 10,0,0,90. КАК избежать этой ошибки?

[Аватар]

КАК избежать этой ошибки?

А я что предложил? Все, кроме конкретного расчета для какого спинэдита и на сколько изменить значенние. Ну если знаете как должно быть правильно, то это и есть готовая формула, осталось только рассчитанные значения поместить в нужные места. В чем проблема?

[Человек_Борща]

Я понял, что автор либо сам не знает, что хочет. Либо думает, что все телепаты и из головы вытянут его обьяснения. И да, можно человеческим языком ищложить, что вам надо?