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

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

Почему не появляется текст в ячейке AdvStringGrid.


kopachev ©   (2002-04-11 14:46:00) 

Почему не появляется текст в ячейке AdvStringGrid.
int col=2, row=7;
if (AdvStringGrid1->RowCount < row)
{
for (int i=0; i<row-AdvStringGrid1->RowCount; i++)
AdvStringGrid1->AddRow();
}
AnsiString str = "kk";
AdvStringGrid1->Cells[col][row] = str;


kopachev   (2002-04-12 09:31:00) [1]

Ребят, все получилось. Использовал последний код. Все работает(а раньше нехотело). Всем спасибо!!!


kopachev   (2002-04-12 09:22:00) [2]

У меня тоже работает, но только когда я помещаю этот код в обработчик создания формы. FormCreate.
А мне нужно чтобы в процессе работы если не хватает строк, то пользователь мог добывить необходимое ему количество.
Я делал обработчик нажатия клавиши и в него вставлял код. Тогда язображения в ячейки не было видно. Хотя взять от туда значение я мог. Может нужно как-нибудь перерисовывать ячейки. Invalidate напимер делать. Подскажите чего-нибудь


VAP   (2002-04-12 08:22:00) [3]

Все нормально работает.
Можно еще проще:
col:=2; row:=7;
if AdvStringGrid1.RowCount < row then
AdvStringGrid1.RowCount:=row+1;
AdvStringGrid1.Cells[col,row] := "kk";


kopachev   (2002-04-11 23:51:00) [4]

Киньте pas файл, у кого получилось


kopachev   (2002-04-11 20:30:00) [5]

Да нет, у меня не работает. Делаю как выше.
Букв не видно.
Хотя если взять значение из AdvStringGrid1.Cells[col,row], то оно там есть "kk":
Panel1->Caption=AdvStringGrid1->Cells[col][row];
На панели выводится "кк". А в гриде не видно. Может нужно деалить перерисовку.
Киньте pas файл, у кого получилось.


ded_di   (2002-04-11 15:22:00) [6]

Работает (появляется)

col:=2; row:=7;
if AdvStringGrid1.RowCount < row then
begin
for i:=0 to row-AdvStringGrid1.RowCount do
AdvStringGrid1.RowCount:=AdvStringGrid1.RowCount+1;
end;
AdvStringGrid1.Cells[col,row] := "kk";


Наверх

Титульная страница Поиск, карта сайта Написать письмо