1 Topic by abgroup-artur (edited by abgroup-artur 2020-09-23 14:59:14)

  • Registered: 2016-09-28
  • Posts: 112

Topic: Обращение к обьекту Формы наименование которых зашито в массив данных

Добрый день. Помогите решить проблему с типами. на строку 

 arr[i]:=i;

ругается


  arr : array of TObject {'IO.Edit5.Text','Edit2','Edit8','Edit11','Edit14','Edit17','Edit20',
                          'Edit5','Edit2','Edit8','Edit11','Edit14','Edit17','Edit20',
                          'Edit5','Edit2','Edit8','Edit11','Edit14','Edit17','Edit20',
                          'Edit5','Edit2','Edit8','Edit11','Edit14','Edit17','Edit20',
                          'Edit5','Edit2','Edit8','Edit11','Edit14','Edit17','Edit20',
                          'Edit5','Edit2'};

procedure exchengeMonth ();
var
   Y,M, i, dw, D: integer;
begin
     //
     DecodeDate(gpm,D,M,Y);
     dw:= DayOfWeek(gpm);

     for i := 1 to DaysInMonth(Y,M) do
        begin
             arr[i]:=i;
          end;
end;
  • From: Нефтеюганск
  • Registered: 2018-04-11
  • Posts: 1,775

Re: Обращение к обьекту Формы наименование которых зашито в массив данных

у Вас массив Object

а i - это integer

получается, что Вы пытаетесь присвоить число массиву объектов