Скачать: CL | DM;

Как получить (и записать) значение свойства Menu у формы   Найти похожие ветки 

← →
Int23   (2008-10-22 16:36) [0]

Нужно значение свойства получить в виде Form2.MainMenu1 затем сохранить его в файл, а в последствии считать с файла и присвоить в таком же виде. Пробовал через GetPropValue, но в таком виде мне возвращается ссылка на компонент

---

← →
Int23   (2008-10-22 17:13) [1]

Написал. Мож кому пригодится
function ExtGetFullComponentName(Component: TComponent): string;
var
 CurrOwner : TComponent;
begin
 if (Component <> nil) and (Component.Name <> "") then
 begin
   CurrOwner := Component.Owner;
   Result := Component.Name;
   while Assigned(CurrOwner) and (CurrOwner<>Forms.Application) do
   begin
    Result := CurrOwner.Name + "." + Result;
    CurrOwner := CurrOwner.Owner;
   end
 end
 else
   Result := "";
end;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c