Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TStringGrid - чтение/запись несуществующих ячеек?! / 3 сообщений из 3, страница 1 из 1
03.02.2019, 19:13
    #39768968
Правильный Вася
Правильный Вася
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStringGrid - чтение/запись несуществующих ячеек?!
Delphi 10.2 Version 25.0.29039.2004

Столкнулся с дикой странностью. Судя по справке - это точно баг, но очень веселый.

На форме имеем TStringGrid, TMemo и 2 кнопки.
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
procedure TForm1.Button1Click(Sender: TObject);
var
    i, j: Integer;
begin
    for i := 1 to 3*( grid1.RowCount - 1 ) do
        for j := 0 to 3*( grid1.ColCount - 1 ) do
            grid1.Cells[ j, i ] := 'col=' + IntToStr(j) + '  row=' + IntToStr(i);
end;

procedure TForm1.Button2Click(Sender: TObject);
var
    i, j: Integer;
    s: String;
begin
    s := '';
    for i := 1 to 3*( grid1.RowCount - 1 ) do
    begin
        for j := 0 to 3*( grid1.ColCount - 1 ) do
            s := s + grid1.Cells[ j, i ] + #9;
        s := s + #13#10;
    end;
    Memo1.Text := s;
end;



Можно увидеть, что у грида СУЩЕСТВУЮТ ячейки, которые не отображаются на экране, находятся за границами свойств ColCount и RowCount, хотя в справке четко сказано:
Use Cells to access the string within a particular cell. ACol is the column coordinate of the cell, and ARow is the row coordinate of the cell.

The ColCount and RowCount property values define the size of the array of strings.

Собственно вопрос:

Это только в моей версии такая фигня или в других тоже? Тогда, может, это фича?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.02.2019, 19:18
    #39768969
Соколинский Борис
Соколинский Борис
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStringGrid - чтение/запись несуществующих ячеек?!
Это только в моей версии такая фигня или в других тоже? Тогда, может, это фича?
Это и не баг, и не фича: к ошибке не приводит и пользоваться ее ради каких-то хитрых кунштюков тоже не получится.
Эта фигня была с самых первых дельфей.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.02.2019, 22:24
    #39768997
rgreat
rgreat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStringGrid - чтение/запись несуществующих ячеек?!
Фича.

Обращение к Cells выделяет память, даже если она за границей ColCount/RowCount.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TStringGrid - чтение/запись несуществующих ячеек?! / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 420ms
Закрыть
start [/forum/topic.php?fid=58&tablet=1&tid=2039860]:
 0ms
get settings:
 7ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 157ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 26ms
get tp. blocked users:
 1ms
others: 201ms
total:  420ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]