-
Добрый день! Есть форма, на ней лежат 6 шт. Image. Есть TrackBar-ы отвечающие за коррекцию по цветам, яркость и контрастность. При загрузке картинок регулируются все 6 штук одновременно! :-) Как разделить процесс для поочередного изменения параметров изображения? Пробовал ImageClick - результат нулевой.
-
- radiobutton около каждого img; - var selImg: integer и установка по клику в 1..6; - другие фантазии;
-
Сейчас попробую, спасибо!
-
Извините, если возможно, пример кода, если честно, я новичок в Делфи. Спасибо заранее.
-
procedure TForm1.selImageClick(Sender: TObject); var selImage : integer; ImageTag :=[0..5] if Image7.Tag:=0 then begin Image7.Enabled:= True; end;
и т.д.
Правильно?
-
Вы пошли бы и начали с книжек, тут у Вас полная хрень.
*** Вводим переменную var selImg: integer;
На клике imgX присваиваем selImg := x, где x - условный номер img. Далее, при изменении TrackBar-ов изучаем содержимое selImg и работаем с соответствующим ему img.
Или такой вариант: Можно ввести переменную var SelImg: TImage; и при клике на каком-либо изображении TImage копировать указатель selImg := Sender as TImage;
В дальнейшем для обработки использовать SelImage.
|