Delphi Получение списка "основных" свойств компонента

[evg_m]

А если нужно определить свойства любого обьекта? Не только контрола.

в TМemo должны отобразиться его основные свойства (например имя, положение х,у).

ключевое слово Основные , то бишь общие для нескольких типов ( наследуемые от общего предка). Tcontrol взят для примера и имеющий все пречисленные в примере свойства.

xxx это какая-то строка из Tlistbox? т.е. в ххх мы записываем то что пользователь выбрал из списка?

Нет xxx это некий объект (скорее всего форма(FormXXX)) на котором размещены всякие разные control's и другие прочие components.
просматривая список оных (xxx.components[]) мы помещаем в наш Listbox1.add(добавляем) строку с именем
xxx.components[].name и в этой строке запоминаем ССЫЛКУ на сам компонент xxx.components[]

потом при выборе строки достаем эту ссылку с приведением типа к одному из общих типов имеющих все нужные нам свойства.

r:=listbox1.items{?strings?}.objects[j] as Tcontrol;

и читаем эти свойства.

[McFrey]

evg_m, т.е. компоненты должны быть на форме? ну ставим им visible false ,например, чтоб пользователя не мучать, а дальше уже они заносятся в список и т.д...я правильно понимаю?

[McFrey]

evg_m, сделал так как вы сказали, но тогда в мемо ничего не выводится....

 i:=LBox1.itemindex;
  if LBox1.items.objects[i] is Tcontrol then
  begin
   r:=LBox1.items.objects[i] as Tcontrol;
   memo.clear;
   memo.lines.add(r.classname);
   memo.lines.add(r.name);
   memo.lines.add(inttostr(r.left));
   memo.lines.add(inttostr(r.top));
   memo.lines.add(inttostr(r.width));
   memo.lines.add(inttostr(r.height));
  end;

а переменная r у нас типа Tcontrol?

[McFrey]

а еще он ругается на это

listbox1.add(xxx.components[j].name, xxx.components[j]);

или так

LBox1.items.add(Components[i].Name, Components[i]);

Ошибка: [Error] Unit1.pas(42): Too many actual parameters...
как быть???