Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как объявить переменную динамического массива в разделе property / 3 сообщений из 3, страница 1 из 1
31.10.2020, 01:13
    #40013622
FIL23
FIL23
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как объявить переменную динамического массива в разделе property
Добрый день,

Не знаю как это сделать подскажите пожалуйста.

Пытаюсь так но естественно не получается

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
type

TParamString=record
  LabelNameSpace:TUniLabel;
  ID1:integer;
  RadioButton1:TUniRadioButton;
  ID2:integer;
  RadioButton2:TUniRadioButton;
  ID3:integer;
  RadioButton3:TUniRadioButton;
  RadioButton4:TUniRadioButton;
  Panel:TUniPanel;
  CheckedID:integer;  
  Labelstatus:TUniLabel;
end;

  TUniMainModule = class(TUniGUIMainModule)
    IBDatabase: TIBDatabase;
    IBTransaction1: TIBTransaction;
    procedure UniGUIMainModuleCreate(Sender: TObject);

  private
    FgperUser: string;  //глобальная перемення для содержания логина пользователя.

    sParamString:      TParamString;
    { Private declarations }
  public
   property  gperUser:string read FgperUser write FgperUser;
   property  dParamString:array of TParamString read sParamString write sParamString;
   function MyInitializationTIBQerySelect(perIBQuery:TIBQuery):TIBQuery;
    { Public declarations }
  end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.10.2020, 01:23
    #40013626
ъъъъъ
ъъъъъ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как объявить переменную динамического массива в разделе property
FIL23,

может быть, тебе просто нужно свойство с доступом по индексу, типа Lines в TMemo?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.10.2020, 02:31
    #40013636
DimaBr
DimaBr
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как объявить переменную динамического массива в разделе property
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
TParamString=record
  A: TObject;
end;

TArrayString = array of TParamString;

TUniMainModule = class(TObject)
  private
    FArrayString: TArrayString;
    function GetParamString(Index: integer): TParamString;
  public
   property ArrayString: TArrayString read FArrayString write FArrayString;
   property ParamString[Index: integer]: TParamString read GetParamString;
end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как объявить переменную динамического массива в разделе property / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 453ms
Закрыть
start [/forum/topic.php?fid=58&mobile=1&tid=2037893]:
 0ms
get settings:
 7ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 151ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 37ms
get tp. blocked users:
 1ms
others: 231ms
total:  453ms
x
x
Закрыть


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