Секундочку... Но если действовать так, то возникает Exception (в момент вызова Application.Run)
Код:
Form1.Controls[i*11].SetTextBuf(PChar(names[1,i+1]));
Form1.Controls[i*11].Perform(WM_SETTEXT,0,Cardinal(PChar(names[1,i+1])));
Эти 2 куска кода должны вести себя одинаково, так? Но если заменить первый вторым, то смотрим на скриншот.
Добавлено:
Цитата Delphi Help:
|
EListError is raised when an error is made in a list, TStrings, or TStringList object.
|
Так у меня на форме нет списков и переменных TStrings тоже нет
Добавлено:
Тут еще подумал. А такой массив случайно не рассматривается в Делфи как TStrings^
Код:
a: array[1..n] of string;
Нееее... Это уж действительно бред пошел. Пора вздремнуть хоть часок