| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

StringGrid выделять текст, но нельзя было редактировать [D7, WinXP]

Страницы:   < 1 2 3 >

Dmitry_177 ©   (2007-07-28 19:25:00) 

Можно ли какнибудь сделать так, чтобы текст в StringGrid-е, который находится в ячейках можно было бы выделять, но нельзя было бы редактировать?

---

Dmitry_177   (2007-07-28 20:13:00) [41]

а не...!!! работает =))) спасибо, это я просто стормозил =) У меня StringGrid подругому называется, не StringGrid1 =)))

а насчет TStringGridX всеже интересно почему так..

---

Dmitry_177   (2007-07-28 20:09:00) [42]

пишет:

> [Error] Unit1.pas(2179): Undeclared identifier: 'ReadOnly'


а обязательно этот TStringGridX использовать? чем обычный TStringGrid не подходит?

А так как в Lacmus ©   (28.07.07 20:02) [5]
AV

---

Lacmus   (2007-07-28 20:02:00) [43]

Еще вариант


type
 TStringGridX = class(TStringGrid);

procedure TForm6.StringGrid1GetEditText(Sender: TObject; ACol, ARow: Integer;
 var Value: string);
begin
 SendMessage(TStringGridX(StringGrid1).InplaceEditor.Handle, EM_SETREADONLY, 1, 0);
end;



---

Lacmus   (2007-07-28 19:59:00) [44]

Это рабочий код, только Delphi 2007.

Какое точное сообщение об ошибке ?

---

Dmitry_177   (2007-07-28 19:48:00) [45]

у TStringGridX(StringGrid1).InplaceEditor нету ReadOnly..

---

Lacmus   (2007-07-28 19:37:00) [46]



type
 TStringGridX = class(TStringGrid);

procedure TForm6.StringGrid1GetEditText(Sender: TObject; ACol, ARow: Integer;
 var Value: string);
begin
 TStringGridX(StringGrid1).InplaceEditor .ReadOnly := True
end;



---

Dmitry_177   (2007-07-28 19:28:00) [47]

выделять курсором имеется ввиду..

---

Страницы:   < 1 2 3 >

Наверх