0 / 0 / 2
Регистрация: 20.01.2013
Сообщений: 81
1

Закрасить ячейку в Stringgrid с минимальным элементом

01.12.2014, 13:02. Показов 1213. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Доброго времени суток!

Не как не могу разобраться с раскрашиванием ячеек!

Delphi
1
 var ACol, ARow: Integer; Rect: TRect;
Delphi
1
2
3
StringGrid1.Canvas.Brush.Color:=clRed;
if ((ACol=2)and(ARow=2)) then
  StringGrid1.Canvas.FillRect(Rect);
Найти нашел, но не понимаю в чем дело....почему не закрашивает мин элемент:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
With StringGrid1 do
 for i:=1 to RowCount-1 do
 begin
 min:=strtoint(StringGrid1.Cells[0,i]);
  for j:=0 to ColCount-1 do
  if (strtoint(StringGrid1.Cells[j,i])<min) then
  begin
  min:=Strtoint(StringGrid1.Cells[j,i]);
  ShowMessage(IntToStr(min));
  end;
  StringGrid2.Cells[0,i]:=IntToStr(min);
  end;      end;
п.с Убрал из-за не рабочего состояния)

Это все на TForm1.Button1Click(Sender: TObject);
Помогите мне с тем, чтобы stringgrid закрашивал или подчеркивал мин. элемент.
и еще, как находить пред последний минимальный элемент?,а вообще тут задача задача про Метод Мака)
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.12.2014, 13:02
Ответы с готовыми решениями:

Как закрасить ячейку в StringGrid?
А как закрасить ячейку(и) в StringGrid?

Как закрасить ячейку в StringGrid?
Мне необходимо чтобы при нажатии bitbtn закрашивались все ячейки в StringGrid в которых...

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

Как закрасить определённую ячейку в StringGrid
Как закрасить определённую ячейку черным цветом и чтобы в нее нельзя было вводить букву. Это для...

1
пофигист широкого профиля
4746 / 3182 / 860
Регистрация: 15.07.2013
Сообщений: 18,341
02.12.2014, 01:51 2
Цитата Сообщение от darankos2 Посмотреть сообщение
Это все на TForm1.Button1Click(Sender: TObject);
В TForm1.Button1Click можно находить минимальный, максимальный или ещё какой вздумается элемент.
Но раскрашивать сей элемент, как и весь СтрингГрид можно и обязательно нужно только в событии OnDrawCell. Значит при поиске минимального/максимального/или еще какого-то элемента в Стринггриде надо его как-то метить. Для этого подходит свойство TStrings.Objects.
0
02.12.2014, 01:51
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.12.2014, 01:51
Помогаю со студенческими работами здесь

Закрасить определенную ячейку StringGrid-а другим цветом
возможно ли сделать так: чтобы с помощью ТОЛЬКО кнопки (потомучто у меня есть цикл где копирует в...

Как закрасить ячейку в Stringgrid, в которой есть "*"
Всем привет! Подскажите мне пожалуйста, как закрасить ячейки Stringgrid в которой есть &quot;*&quot;?

Нужно строку с минимальным элементом поменять местами со столбцом с максимальным элементом
Кто может подсказать что тут не так? procedure TForm1.Button1Click(Sender: TObject); begin...

поменять местами столбец с минимальным элементом и столбец с максимальным элементом
Вводится матрица вещественных чисел,необходимо поменять местами столбец с минимальным элементом и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru