[MiXa777]

Пробывал сделать как описал TOJluK , но проблема, когда я пробую в Query1 присвоить в св-ве DataSource DataSource1=DataSource2, то прога ругается и визвращает св-ву DataSource преведущее значение т.е. DataSource1