Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перенос полей из одного TQuery в другой

ORMADA © (2004-05-31 12:43:00)
Добрый день!
Вот так пробовал извращаться
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 ?

ORMADA (2004-05-31 13:20:00) [1]
В поля тип которых TVariantField можно ввсети чё хош
а вот в TIntegerField фигушки. во :)

Ozone (2004-05-31 13:13:00) [2]
>> Вопрос вот в чём как сделать чтоб в поля типа инт нельзя было вводить буквы как в обычные TIntegerField

???

ORMADA (2004-05-31 12:50:00) [3]
2 Vlad

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

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

Vlad (2004-05-31 12:48:00) [4]

> ORMADA © (31.05.04 12:43)

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

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

Что это ?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »