Текущий архив: 2003.04.21;
Скачать: CL | DM;

Вниз

StringGrid   Найти похожие ветки 

← →
Vasiles   (2003-04-10 17:03) [0]

Как можно программно менять разрешение на редактирование таблицы StringGrid? Свойство Options-goEditing, но какой синтаксис? Что то там не чисто?..

---

← →
Skier ©   (2003-04-10 17:06) [1]

см. Set operators

---

← →
Бобко Сергей   (2003-04-11 16:27) [2]

Например так:

procedure TForm1.StringGrid1SelectCell(Sender: TObject;
ACol, ARow: Integer; var CanSelect: Boolean);
begin
if ((ACol = 2) or (ACol = 3)) then InvoiceStringGrid.Options:=InvoiceStringGrid.Options + [goEditing]
else InvoiceStringGrid.Options:=InvoiceStringGrid.Options-[goEditing];
end;

---

← →
Бобко Сергей   (2003-04-11 16:29) [3]

sorry опечатка

procedure TForm1.StringGrid1SelectCell(Sender: TObject;
ACol, ARow: Integer; var CanSelect: Boolean);
begin
if ((ACol = 2) or (ACol = 3)) then StringGrid1.Options:=StringGrid1.Options + [goEditing]
else StringGrid1.Options:=StringGrid1.Options-[goEditing];
end;

---

Страницы: 1 вся ветка

Текущий архив: 2003.04.21;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.013 c