Вниз
Скачать: CL | DM;

Компонент в run-time без выдачи ему имени   Найти похожие ветки 

 
AlexeyMir   (2008-02-26 15:04) [0]

Подскажите, я создаю компонент TQuery в run-time без выдачи ему имени, как присвоить свойству другого компонента соданному в design-time.
Если бы оба компонента создавались в дизайнере то было бы так: frDBDataSet1.DataSet:=Query1

А как написать следующее?
with TQuery.Create(nil) do
  try
    Database:=IBDatabase1;
    Sql.Text := "select * from table1";
    ExecQuery;    
    id := Fields[0].AsInteger;  
    frDBDataSet1.DataSet:=?????;
    frReport1.PrintPreparedReport("",1)
  finally
    Free;                
  end;


 
Джо ©   (2008-02-26 15:07) [1]

var
 Query: TQuery;
...
Query := TQuery.Create
frDBDataSet1.DataSet := Query

в чем проблема-то?


 
AlexeyMir   (2008-02-26 15:13) [2]

Мне нужно Query создать в процессе работы приложения.

with TQuery.Create(nil) do
 try
   Database:=IBDatabase1;
   Sql.Text := "select * from table1";
   ExecQuery;    
   id := Fields[0].AsInteger;  
   frDBDataSet1.DataSet:=?????????????;
   frReport1.PrintPreparedReport("",1)
 finally
   Free;                
 end;


 
Palladin ©   (2008-02-26 15:14) [3]


> AlexeyMir   (26.02.08 15:13) [2]

тебе уже сказали как... переменную объяви, нечего с With баловаться


 
Сергей М. ©   (2008-02-26 15:15) [4]


> Мне нужно Query создать в процессе работы приложения


А иначе, кроме как в ран-тайм, его создать и нельзя.

Ты вообще в [1] вник ?


 
Плохиш ©   (2008-02-26 15:18) [5]

Прям эпидемия какая-то с этим with...



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c
15-1202636826
@!!ex
2008-02-10 12:47
2008.03.23
Что за группа? Что за трэк?


2-1203579448
Quart
2008-02-21 10:37
2008.03.23
QRLabel


15-1202446356
ketmar
2008-02-08 07:52
2008.03.23
музыка a-la End Zone — Thalatta Et Thanatos


15-1202579701
88Lion88
2008-02-09 20:55
2008.03.23
Литература


2-1203860838
dramadol
2008-02-24 16:47
2008.03.23
Обрезать длину файла при перезаписи




   Наверх