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

Перенос полей из одного TQuery в другой   Найти похожие ветки 

← →
ORMADA ©   (2004-05-31 12:43) [0]

Добрый день!
Вот так пробовал извращаться
ADOQuery1.FieldDefs.Assign(ADOQuery3.FieldDefs);
но получается полная фигня-все данные в таблице в которую переносиш представляют собой 1 запись из таблицы из кот переносиш

ЩА делаю так
 for i:=0 to ADOQuery3.FieldCount-1 do
 with TVariantField.Create(ADOQuery1) do
 begin
   FieldKind :=ADOQuery3.Fields.Fields[i].FieldKind;
    SetFieldType(ftInteger);
   FieldName :=...
   Name := ..
  ADOQuery1.FieldDefs.Add(name, ftVariant);
end;

Кроме маски ввода (EditMask) что нить можно предложить ?
Или есть ли какие нить маски чтоб не учитывать кол-во символов  ? Смотрел раздел хелпа по маскам там вроде написано что надо задавать точное кол-во позиций.

Вопрос вот в чём как сделать чтоб в поля типа инт нельзя было вводить буквы как в обычные TIntegerField ?

---

← →
Vlad ©   (2004-05-31 12:48) [1]

> ORMADA ©   (31.05.04 12:43)  

Ничего не понял. Что в итоге-то надо ?

>  for i:=0 to ADOQuery3.FieldCount-1 do
>  with TVariantField.Create(ADOQuery1) do

Что это ?

---

← →
ORMADA ©   (2004-05-31 12:50) [2]

2 Vlad

>  for i:=0 to ADOQuery3.FieldCount-1 do
>  with TVariantField.Create(ADOQuery1) do
енто создание полей в другом квери

Вопрос вот в чём как сделать чтоб в поля типа инт нельзя было вводить буквы как в обычные TIntegerField ?

---

← →
Ozone ©   (2004-05-31 13:13) [3]

>> Вопрос вот в чём как сделать чтоб в поля типа инт нельзя было вводить буквы как в обычные TIntegerField

???

---

← →
ORMADA ©   (2004-05-31 13:20) [4]

В поля тип которых TVariantField можно ввсети чё хош
а вот в  TIntegerField фигушки. во :)

---

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

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



Память: 0.46 MB
Время: 0.028 c