Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2008.03.30;
Скачать: [xml.tar.bz2];

Вниз

Проверить компонент   Найти похожие ветки 

 
ввв   (2008-02-18 16:07) [0]

Как можно проверить компонент на свойство DataSource,
т.е.
Имеется ли у этого компонента свойство DataSource или нет ...?

Заранее спасибо !


 
Washington ©   (2008-02-18 16:09) [1]

наверное компонент.DataSource


 
Семеныч   (2008-02-18 16:10) [2]

uses TypInfo.
IsPublishedProp


 
ввв   (2008-02-18 16:12) [3]

procedure pr;
var
i: Integer;
Ctrl: TComponent;

begin
  for i := 0 to ComponentCount - 1 do
  begin
     Ctrl := fHandBook.FindComponent(Components[i].Name);
     if ( Ctrl <> nil ) then
        if ( Ctrl is TDataSource ) then
           TWinControl(Ctrl as TDataSource).tadasource := nil;

     ds.Next;
  end;

end;  

Нужно у всех компонентов имеющих свойство DataSource, отчистить его т.е. nil

Вот както так хочу а не получается...


 
ввв   (2008-02-18 16:12) [4]

Если у компонента не будет свойство DS ошибки не будет ?


 
Skier ©   (2008-02-18 16:15) [5]


> Если у компонента не будет свойство DS ошибки не будет ?

Будет.
Тебе же говорят - используй RTTI
Справку и код может найти в Инете, на эту тему его зело много...



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

Форум: "Прочее";
Текущий архив: 2008.03.30;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.04 c
15-1203415250
Ega23
2008-02-19 13:00
2008.03.30
Что почитать про безопасность?


15-1202491427
KilkennyCat
2008-02-08 20:23
2008.03.30
Свершилось!


2-1204201182
ply
2008-02-28 15:19
2008.03.30
Выполнить действие для всех объектов формы


2-1204472475
Alex
2008-03-02 18:41
2008.03.30
Совсем лёгкий вопрос


2-1204182102
AlexeyMir
2008-02-28 10:01
2008.03.30
ImageList1 в TreeView





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский