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

Вниз

Где хранится список всех компонентов TDataSource на форме   Найти похожие ветки 

 
vodvorezlaya   (2006-09-28 09:54) [0]

Всем доброго дня.

Ув. мастера необходимо узнать список всех компонентов TDataSource и занести его в поле ListBox.

Спасибо.


 
Бугага ©   (2006-09-28 09:56) [1]

for i:=0 to Form.ComponentsCount-1 do
if Components[i] is TDataSource then...


 
clickmaker ©   (2006-09-28 09:58) [2]

Form.Components, проверять if Components[i] is TDataSource

если эти датасоурсы прицеплены к DataSet, а они ссылаются на Database, то можно и через Database.DataSets


 
vodvorezlaya   (2006-09-28 10:06) [3]

procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
for i := 0 to Form1.ComponentCount-1 do
 begin
   if Components[i] is TDataSource
   then ListBox1.AddItem(Components[i].Name,Components[i]);
 end;
end;\

Спасибо. Работает.



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

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

Наверх




Память: 0.47 MB
Время: 0.071 c
1-1161205924
Zurius
2006-10-19 01:12
2006.12.03
Помогите "разобраться с DBGrid


15-1163485918
KygECHuK
2006-11-14 09:31
2006.12.03
Маленький вопрос


2-1163273365
(_)
2006-11-11 22:29
2006.12.03
Проект.


15-1163737492
0x07BBh
2006-11-17 07:24
2006.12.03
Подскажите пожалуйста адресс "Кладовки"


15-1163136696
DelphiN!
2006-11-10 08:31
2006.12.03
Сегодня начальство попросило написать свою OC