Главная страница
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.055 c
15-1163163560
koha
2006-11-10 15:59
2006.12.03
Модератору !!!


2-1163334112
Max.66RUS
2006-11-12 15:21
2006.12.03
Простейшие вопросы по текстовым файлам и строкам...


15-1163093807
Мазут Береговой
2006-11-09 20:36
2006.12.03
Дрянь какая-то завелась


3-1159522323
RomanH
2006-09-29 13:32
2006.12.03
Результат запроса null->результат запроса=0


15-1163157805
Elen
2006-11-10 14:23
2006.12.03
Конвертация 3D