Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Копирование полей [D6]


sergeii ©   (2005-01-06 14:42:00) 

Может кто может подсказать как мне скопировать всио поле в туже таблицу в её конец. (Как это сделать правельно). Может кто может кинуть примерчик. База парадокс


DSKalugin   (2005-01-06 16:58:00) [1]

за итальянское SPASIBO
украинское будь ласка
:)))
Там если не все значения полей копировать, то некоторые вручную потом подправить можно типа
 Table666.fields[8].Value:=Edit666.text;
 перед строкой
 Table666.Post;


sergeii   (2005-01-06 16:37:00) [2]

:))) SPASIBO


DSKalugin   (2005-01-06 16:16:00) [3]

Вопрос ясен. "А Нафига" это уже другой вопрос для которого можно открывать отдельную ветку (в орешнике)
Ответ таков:

// Добавление копии текущей записи в конец таблицы
{P.S. Все это работает только при отсутствии сортировки (без использования индексов)}
var Nafiga: Variant;
   fi,fc:Byte;
begin
 fc:=Table666.FieldCount-1;
 Nafiga:=VarArrayCreate([0,fc], varVariant);
 for fi:=0 to fc do Nafiga[fi]:=Table666.fields[fi].Value;
 Table666.Append;
 for fi:=0 to fc do Table666.fields[fi].Value:=Nafiga[fi];
 Table666.Post;
 Table666.Refresh;
end;


msguns   (2005-01-06 15:48:00) [4]

Да, случай тяжелый. Потому, что "базу", видимо, проектировал крутой перец. Усугубляется еще тем, что знания Сергейя о базах данных, видимо, исчерпываются екселем.

Ничего, кроме усиленного чтения всевозможной литературы, посоветовать не могу, увы..


sergeii   (2005-01-06 15:45:00) [5]

ja pishu programu k tablice uzhe sushestvujushei i mne nado sozdavat' stroki takie kak pervaja. V stroke est' skol'koto nemeniaemix jacheek i skol'koto meniaemix, meniaemix tolko 5 jacheek a ne menejamix 29 jacheek.
Vot dlia etogo i nado. Zachem nuzhno stoko odinakovyx jachejek ja ne znaju, po tomu kak ne moja baza.


Anatoly Podgoretsky   (2005-01-06 14:53:00) [6]

Что ты хочешь сделать?


msguns   (2005-01-06 14:50:00) [7]

???

Если я правильно понял, надо всю первую запись скопировать так, чтобы ее копия оказалась последней в отображаемой таблице.

А нафига ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо