Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.12;
Скачать: CL | DM;

Вниз

Глупый вопрос.   Найти похожие ветки 

 
Peroon   (2002-08-31 15:51) [0]

Есть-ли операция подобная inttostr(floattostr, и наоборот) но только
для других типов? Например, переменную типа String sh="shape1"
перевести в тип TShape, т.е. чтобы sh равнялась объекту shape1.
Я, конечно, понимаю что все это звучит глупо... но все же...

Или как мне, допустим, в массив из ста элементов типа TShape занести сто объектов Shape с именами вида shape1, shape2, shape3... Поэлементное присваивание не счет.


 
McSimm ©   (2002-09-01 11:35) [1]

sh := TShape.Create(Self); // или другой Owner вместо Self
sh.Name := "shape1"; // или, если в цикле, "shape" + IntToStr(I)
sh.Parent := Self; // на куда положить :)


 
Anatoly Podgoretsky ©   (2002-09-01 11:40) [2]

Без поэлементного присваивания ну никак


 
Юрий Зотов ©   (2002-09-01 11:43) [3]

var
Sh: TShape;
...
Sh := TShape(FindComponent("Shape1"));

Примечание: FindComponent надо вызывать для того компонента, который является Owner"ом Shape1. Если Shape1 создавался в design-time, то это будет форма, если нет - тогда то, что передавалось в конструктор.


 
Криворукий   (2002-09-01 11:44) [4]

Если шэйпы принадлежат какой-нибудь форме, то

shapes[i] := FormThatOwnsTheseShapes.FindComponent("shape" + IntToStr[i]) as TShape;

Если вновь создаваемые шейпы - McSimm © (01.09.02 11:35).



Страницы: 1 вся ветка

Текущий архив: 2002.09.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
3-35539
sammy
2002-08-21 08:30
2002.09.12
Add record


1-35740
murza
2002-08-26 12:21
2002.09.12
TStrings * не считывается из DFM


1-35736
RV
2002-08-30 14:04
2002.09.12
CreateProcess, как узнать код ошибки


3-35619
kest2
2002-08-22 11:25
2002.09.12
Oшибка!?


3-35541
Oleg_EM
2002-08-21 15:27
2002.09.12
Вы будете смеяцца, но КАК перезапустить IB 5 ?