Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];
ВнизПодскажите, как запретить редактировать только одну ячейку в Найти похожие ветки
← →
Layner (2004-01-21 15:17) [0]StringGrid? И тоже самое для F1Book, но это я по аналогии сделаю, как в SG. Заранее спасибо.
← →
Рамиль (2004-01-21 15:19) [1]менять options по OnSelectCell
← →
TUser (2004-01-21 15:20) [2]Проверить, какая ячейка отредактировалась. Если та, для которой надо запретить, - тогда отменить.
Можно OnSelectCell обрабатывать и не пущать туда, куда низя.
← →
Layner (2004-01-21 15:35) [3]
procedure Tfstat.sgSelectCell(Sender: TObject; ACol, ARow: Integer;
var CanSelect: Boolean);
begin
If sg.Cells[1,ARow] then
//
end;
А что за сравнение сделать, подскажите плз. Потом CanSelect:=False.
← →
Layner (2004-01-21 15:39) [4]
procedure Tfstat.sgSelectCell(Sender: TObject; ACol, ARow: Integer;
var CanSelect: Boolean);
begin
if (ACol<=2) then
CanSelect:=False;
end;
Дошло :)
← →
Рамиль (2004-01-21 15:39) [5]Запретить редактировать и непущать разные вещи! Если как в сабже то
procedure Tfstat.sgSelectCell(Sender: TObject; ACol, ARow: Integer;
var CanSelect: Boolean);
begin
if (ACol = ColNum) and (ARow = RowNum) then
(Sender as TStringGrid).Options := (Sender as TStringGrid).Options - goEditing else
(Sender as TStringGrid).Options := (Sender as TStringGrid).Options + goEditing
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.018 c