Delphi

pirojok750 · Отправлено: **20:52, 23-10-2009** | #2

Товарищи программисты.Куда все пропали то

pirojok750 · Отправлено: **21:57, 23-10-2009** | #3

Тема немного изменилась.Объект DrawGrid. Цвет ячейки необходимо изменить при клике мышкой на этой ячейке

BlackEric · Отправлено: **23:38, 23-10-2009** | #4

Код:

procedure TForm1.DrawGrid1Click(Sender: TObject);
  var    rect:TRect;
  begin 
   rect := DrawGrid1.CellRect(DrawGrid1.Col, DrawGrid1.Row);
    DrawGrid1.Canvas.Brush.Color := clRed;
    DrawGrid1.Canvas.FillRect(rect);
  end;

pirojok750 · Отправлено: **01:14, 24-10-2009** | #5

BlackEric, надо чтобы после клика ячейка меняла свой цвет и оставляла его себе,когда я кликаю по следующей ячейке

pirojok750 · Отправлено: **01:47, 24-10-2009** | #6

можно так же использовать картинку черного квадратика (например) которая при клике на ячейку будет туда помещатся.

BlackEric · Отправлено: **19:04, 24-10-2009** | #7

Запоминаем какие ячейки уже покрашены и при клике красим не одну, а все которые нужно.

pirojok750 · Отправлено: **19:16, 24-10-2009** | #8

а мне надо имеено те на которые кликают мышкой.это своеобразное выделение необходимо для построения определенной схемы

BlackEric · Отправлено: **10:21, 25-10-2009** | #9

Цитата pirojok750:

а мне надо имеено те на которые кликают мышкой.это своеобразное выделение необходимо для построения определенной схемы »

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

pirojok750 · Отправлено: **13:22, 25-10-2009** | #10

BlackEric, а можно это ввиде кода увидеть?