Перенос полей из одного 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

???

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

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