Delphi7. Изменение картинки при нажатии

[freeeeez]

Есть схема трехфазной цепи. Ключи замыкающие схему должны включаться и выключаться по клику. Вопрос: как сделать чтобы картинка замкнутого ключа менялась на разомкнутый и наоборот? С OnClick не разобрался...

[wm_leviathan]

у вас именно картинки? (TImage) или кнопки с картинками ?

[freeeeez]

TImage картинка. Общая картинка схемы, а на ней ключи и кнопки. К примеру ключ S1 должен меняться на замкнутый. Повторное нажатие отключает цепь.

[wm_leviathan]

К примеру ключ S1 должен меняться на замкнутый.

Тогда ключ S1 должен быть в отдельном TImage. причем 2 картинки 1 замкнутый 2я разомкнутый. и менять их в отдельном TImage. либо пробывать рисовать на канве, но сомневаюсь что выйдет что то путевое.
ЗЫ а вообще я бы сделал так: на фотошопе разрезал бы этот рисунок на элементы, их много конечно за то потом управлять отдельными TImage проще чем 1м большим рисунком.

[freeeeez]

Сообщение от wm_leviathan

ЗЫ а вообще я бы сделал так: на фотошопе разрезал бы этот рисунок на элементы, их много конечно за то потом управлять отдельными TImage проще чем 1м большим рисунком.

так и сделано, просто на рисунке не видно! большая картинка это только провода, все остальное: кнопки, ключи и т.п. это отдельные картинки наложенные сверху на схему.

т.е. ты предлагаешь сделать 2 TImage а в третем TImage(пустом) их менять? как это реализовать?

[SERG1980]

можно так

procedure TForm1.Image1Click(Sender: TObject);
begin
 if image1.Tag = 0 then
  begin
   image1.Picture.LoadFromFile('замкнуто.bmp');
   image1.Tag:=1;
  end
 else
  begin
   image1.Picture.LoadFromFile('разомкнуто.bmp');
   image1.Tag:=0;
  end;
end;

[wm_leviathan]

нет конечно менять только в 1м TImage, просто нам надо будет 2 файла-картинки (1й разомкнуто 2й сомкнута ) пускай 1.jpg это картинка разомкнутая, а 2.jpg это сомкнутая и обе картинки лежат у меня на "с:\6". тогда просто отслеживаешь пути и меняешь картинки при каждом нажатии на TImage.
ЗЫ неувидел что SERG1980 написал.

[freeeeez]

Спасибо! Так и сделал.

[freeeeez]

Теперь все работает, но ключи немного сдвинуты относительно схемы... Все из-за сетки из точек в D7. Можно ли изменить ее масштаб?
Все нашел! Настройки дизайнер

[SERG1980]

Я бы для таких целей использовал компонент TMSDiagrammStudio