Описание тега tobject

1 ответ

Delphi FireMonkey TListBox Исключение AddObject для Android

У меня проблема с добавлением TObject значение для FireMonkey TListBox в Delphi 10.0 Сиэтл Исключение повышается при сотворении Integer переменная к TObject указатель. Я попробовал бросить TFmxObject без успеха. В Windows актерский состав работает к…
09 мар '17 в 19:06
1 ответ

Почему TObject.AfterConstruction и BeforeConstruction имеют публичную видимость?

Сегодня мне пришёл в голову один очень простой вопрос. TObject "s BeforeConstruction метод: Почему TObject методы AfterConstruction а также BeforeConstruction иметь public видимость? Я ожидал, что они будут protected, По какой причине они не? Я не м…
08 май '15 в 10:10
5 ответов

Приведение TObject с использованием его ClassType?

Как я могу заставить мой код работать?:) Я пытался сформулировать этот вопрос, но после нескольких неудачных попыток я думаю, что вы, ребята, заметите проблему быстрее, глядя на код, чем читая мои "объяснения". благодарю вас. setCtrlState([ memo1, e…
04 июл '09 в 22:33
2 ответа

Как извлечь многомерный элемент класса, содержащий многомерные массивы, из массива

В настоящее время я работаю с CodeGear Delphi 2007 под Vista. Моему приложению возвращается ошибка памяти во время довольно сложных вычислений. Размер.exe-файлов увеличивается с 150 Мб до 2 Гб (! LOL) По этому вопросу: 1) Я превращаю некоторые масси…
30 сен '09 в 11:27
0 ответов

Исчезающий SubDetail TObjectList, когда JSonToObject

Это мой первый вопрос Извините мой английский. У меня есть такие классы: TSFis_S = class(TPersistent) private _SFis_MID : Integer; public property SFis_MID : Integer read _SFis_MID write _SFis_MID; end; TSFis_D = class(TPersistent) private _SFis_MID…
17 апр '13 в 22:24
1 ответ

Список тем TObject с Delphi - Как заполнить?

Исходя из моих ограниченных знаний об этом предмете, следующий код должен работать. Но у меня нет ожидаемого результата: type TClient = class(TObject) Host: String; end; var Clients: TThreadList; const Hosts: Array[0..5] of String = ('HOST1', 'HOST2…
18 дек '14 в 20:43
5 ответов

Передача универсального класса <TObject> в форму

Я не могу найти ответ на этот вопрос с помощью поиска, поэтому здесь идет.... Я знаю, что могу передавать объекты Class в целом другим классам, используя этот тип кода: public class ClsGeneric&lt;TObject&gt; where TObject : class { public TObject Ge…
02 авг '17 в 13:34
1 ответ

Inno Setup получает тип / класс TObject в обработчике событий

У меня есть процедура события, которая проверяет OnKeyUp нажатие клавиши для двух объектов / элементов управления (TNewEdit а также TNewComboBox). Оба объекта должны быть завершены до TNewButton становится доступным. Тем не менее, я не могу найти сп…
10 апр '17 в 10:19
2 ответа

Почему префикс "T" в TObject?

При объявлении классов и так далее, что означает "Т" в TObject стоять за? Шаблон? Пример: procedure TfrmMain.CaptureInfo1Click(Sender: TObject); begin frmCapture.Show; end;
17 окт '14 в 08:41
3 ответа

Какие данные содержит TObject?

TObject.InstanceSize возвращает 8, но TObject не объявляет никаких элементов данных. Согласно реализации TObject.ClassType, первые 4 байта могут быть объяснены как указатель на метаданные объекта TClass. Кто-нибудь знает, для чего нужны остальные 4 …
24 мар '09 в 20:01
3 ответа

Неверный тип: преобразование записи в tobject на 64-битной платформе

Он работает на 32-битной платформе. но не 64-битный вот пример TVerbInfo = packed record Verb: Smallint; Flags: Word; end; var VerbInfo: TVerbInfo; strList : TStringList; verb : Smallint; flags : Word; begin strList := TStringList.create(); ..... ve…
19 дек '13 в 11:11
4 ответа

Delphi: передать TObject в массиве вариантов

У меня есть процедура, которая ожидает параметр типа TObject, что-то вроде этого: MyProcedure (const AValue : TObject); У меня есть массив Variant, который я перебираю для вызова процедуры, что-то вроде этого: for i:=0 to High(myArray) do MyProcedur…
15 апр '09 в 11:39
2 ответа

Получить положение объекта в списке в Delphi?

Мне было интересно, как вы получаете положение определенного объекта в списке, который создается. Допустим, это похоже на графический список, где вы можете нажимать на объекты. Допустим, вы щелкаете правой кнопкой мыши по объекту и нажимаете "Обнови…
26 апр '11 в 12:33
3 ответа

Инициализация массива Delphi

В настоящее время у меня есть это, и это отстой: type TpointArray = array [0..3] of Tpoint; class function rotationTable.offsets(pType, rotState, dir: integer): TpointArray; begin Result[0] := point(1, 1); Result[1] := point(1, 2); Result[2] := poin…
20 фев '10 в 03:24
2 ответа

Delphi Livebinding объект и выпадающий список или переключатели

Я определил последующий блок для бизнес-логики unit Models.Person; interface Type TPersonGender = (pgUndefined, pgMale, pgFemale, pgNotApplicable); TSexOfPerson = class(TPersistent) private FGender : TPersonGender; protected function GetDescription …
29 июл '16 в 14:17
2 ответа

Вариант записи вместо перегруженного типа объекта?

Я работаю над проблемой, в которой мне нужно динамически изменять размер массива, для чего требуются многочисленные операции. Я успешно закодировал два класса, t_one и t_two: tarray1 : array of longint; tarray2 : array of single; t_one = class(tobje…
26 июн '20 в 04:17
1 ответ

Проблема с подписью события OnClick в C++ Builder

Я хочу создать функцию, которая заменяет текущее изображение другим. Проблема в том, что мне нужно заменить 64 картинки. Я создал функцию сTImage* Sender параметр, но он работает только когда я устанавливаю Sender как TObject* вместо. Как я могу изм…
08 июл '20 в 21:02
2 ответа

Delphi вызывает виртуальный конструктор на основе типа TObject

У меня есть объект, производный от объекта TStringList, который я называю "TAutoString". Это позволяет вам указать тип объекта при создании списка. Затем каждый раз, когда в список строк добавляется новая запись, она также создает копию объекта, свя…
11 сен '20 в 23:16
1 ответ

Есть ли способ уменьшить код Delphi/как-то поместить другой объект в переменную?

У меня есть var objeto:TDateEdit; ... Если я изменюсь as TDateEditв коде: if UpperCase(CAMPOSnoBANCO[ii]) = UpperCase((FORMULARIO.Components[i] as TDateEdit).name ) и используйте это: if UpperCase(CAMPOSnoBANCO[ii]) = UpperCase((FORMULARIO.Component…
10 мар '21 в 20:03