Здравствуйте
Необходимо, чтобы при добавлении новой строки в Stringgrid программа проверяла ее номер и, в зависимости от ее четности/нечетности скрывала ее. Скрытие делаю присваиванием высоте значения -1 (значение 0 не устраивает, т.к. линии между строками выглядят толстыми).
Код
Код:
1 2 3 4 5 6 7 8 9 | procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
sg.RowCount:=sg.RowCount+1;
for i:=1 to sg.RowCount-1 do begin
if i mod 2 = 0 then
sg.RowHeights[i]:=-1;
end;
end;
|
Но при таком подходе границы между строками вообще исчезают, когда добавляю несколько строк. Как сделать, чтобы границы оставались?
Спасибо
14.10.2021, 09:27
Stringgrid - исчезают границы между строками
Линейный вид
