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

Вниз

HasProperty ???   Найти похожие ветки 

 
Serghei   (2003-02-17 15:26) [0]

как узнать есть определенный Property некой компоненте в Ран-тайме
типа If TControl(...) HasProperty("***") then...


 
Игорь Шевченко ©   (2003-02-17 15:29) [1]

Например:
var
propInfo: PPropInfo;
thisFont: TFont;
begin
Result := 0;

propInfo := GetPropInfo(AControl.ClassInfo, "Font");

if propInfo <> nil then begin
thisFont := TFont(GetObjectProp(AControl, "Font"));

if Assigned(thisFont) then
with TControlCanvas.Create do
try
Control := AControl;
Font.Assign(thisFont);
Result := TextWidth(AText);
finally
Free;
end;
end;


 
Silver_   (2003-02-17 15:42) [2]

Игорь Шевченко ©

Пасиба по Хелпу искал не там. Еще раз сенькс.


 
Юрий Зотов ©   (2003-02-17 22:21) [3]

Начиная с D5 в TypInfo есть готовая функция IsPublishedProp.



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
1-87528
ЮЮ
2003-02-17 08:37
2003.02.27
Русский интерфейс программы в


1-87358
serg111
2003-02-14 23:01
2003.02.27
как узнать цвет pixel а


3-87262
Ihtiandr
2003-02-07 16:51
2003.02.27
Полоса прокрутки


3-87270
Степанов
2003-02-08 18:34
2003.02.27
Как в Delphi создать таблицу dBASE III


14-87685
Alex Shulg
2003-02-11 15:04
2003.02.27
Создание Help а