Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Редактирование отдельных ячеек

Автор: Полудненко Олег 28.10.2004, 15:35

Как в StringGrid можно разрешить редактирование только отдельных ячеек?

Автор: Marriage 28.10.2004, 16:08

А что подразумевается под словом "Редактирование" ???
ТЕкст чтоли или как ???

Автор: Полудненко Олег 28.10.2004, 16:33

Marriage вообщето под этим словом редактирование текста тока и подразумевается...

Автор: Marriage 28.10.2004, 16:58

procedure TForm1.sg1SelectCell(Sender: TObject; ACol, ARow: Integer;
var CanSelect: Boolean);
begin
ShowMessage(IntToStr(Acol)+#13+IntToStr(ARow));

// Или написать функцию, которая будет возвращать можно ли
//редактировать опред. ячейки

if (ACOL=1) and (AROW = 1) then
Begin
CanSelect:=False; ///Теперь ячейку 1,1 нельзя редактировать
End;

end;

Вроде у меня сработало ...

Автор: <Spawn> 28.10.2004, 16:59

Вот пример:

Код

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

Автор: Полудненко Олег 28.10.2004, 18:02

Marriage
<Spawn>
спасибо