Скачать: 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.01 c