Добавление колонок

@FroL · Регистрация: 07.01.2010

Студворк — интернет-сервис помощи студентам

У меня есть таблица с 3 полями(колонками). Мне надо динамически,т.е. кодом, добавить колонку в базу данных, но при добавлении записи в предыдущих стираются .Вижу 2 варианта:
1. Добавить колонку, но что бы старые записи сохранились.
2. Скинуть записи в буфер, а после добавления колонки заново их записать.
Использую связь Table->DataSource->DBGrid.

@Lord_Voodoo · 20.01.2010, 09:08

FroL, а ну-ка покажи, как ты добавляешь?

@FroL · 20.01.2010, 09:12 **[ТС]**

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
{     
 Form1->Table3->Active = false;
 TFieldDef *pNewDef = Form1->Table3->FieldDefs->AddFieldDef();
 AnsiString nam = "Z" + Form1->Table1->FieldByName("№")->AsString;
 pNewDef->Name = nam;
 pNewDef->DataType = ftString;
 pNewDef->Size = 50;
 Form1->Table3->CreateTable();
 Form1->Table3->Open();
 Form1->Table3->Insert();
 Form1->Table3->First();
 TField* field = Form1->Table3->FindField(nam);
 for(int i = 0; i <= k; i++)
  {
    if(op[i] != "")
    {
     Form1->Table3->Append();
     field->AsString = op[i];
    }
  }   
 Form1->Table3->Post();
 Form2->Close(); 
}

@Lord_Voodoo · 20.01.2010, 09:35

FroL, ты решил впихнуть в код все методы класса TTable? 10-11 - переводить таблицу в режим добавления и устанавливать указатель на первую запись совсем не нужно... 17 - это уже точно лишнее, да и field лишнее, можно через fieldbyname все организовать... а еще у меня возникает вопрос - таблица создается постоянно?

@FroL · 20.01.2010, 09:38 **[ТС]**

нет. Я взял это с Архангельского. Этот код рабочий, только Table->CreateTable стирает все записи. А без нее не добавляется колонка.

@Lord_Voodoo · 20.01.2010, 09:45

FroL, так Архангельского в таком случае я читать не буду, потому что либо ты что-то путаешь и наговариваешь на человека, либо мне такие советы и даром не нужны... а на счет того, что данные исчезают, я могу тебе объяснить - ты постоянно пересоздаешь таблицу и заливаешь данные... таблицу по-хорошему надо создавать, когда ее нет, т.е. хотя бы проверку бы впихнул...

@FroL · 20.01.2010, 16:59 **[ТС]**

C++
1
2
3
4
5
6
7
8
9
10
 Form1->Table3->First();
 
 for(int i = 0; i <= k; i++)
  {
    if(op[i] != "")
    {
     Form1->Table3->Append();
     field->AsString = op[i];
    }
  }

Это я прикрутил.У него такого нет. Кстати книжка хорошая. А как же мне тогда сохранить добавленную колонку?

Добавлено через 7 часов 10 минут
Очень надо.А может скинуть всю таблицу в буфер или в другую таблицу ,добавить колонку и скопировать обратно? Только как это сделать?

@Lord_Voodoo · 20.01.2010, 17:08

FroL, чтобы редактировать структуру таблицы используйте запрос alter table

@FroL · 20.01.2010, 17:11 **[ТС]**

А это как?

@Lord_Voodoo · 20.01.2010, 17:19

FroL, вы не знакомы с sql?

@FroL · 20.01.2010, 18:05 **[ТС]**

Нет.А подскажи литературу по SQL.

@Lord_Voodoo · 21.01.2010, 00:00

найдите папку с установленной BDE, там есть файлик localsql.hlp - для начала хватит

@FroL · 21.01.2010, 12:06 **[ТС]**

Большое спасибо.

@FroL · 17.02.2010, 16:30 **[ТС]**

воспользовался Alter Table:

C++
1
2
3
Form1->Query1->Close();
Form1->Query1->SQL->Strings[0] = "Alter Table Fale Add Z106 CHAR(100)";
Form1->Query1->ExecSQL();

Все отлично добавлялось.Но снес винду, была Vista поставил Seven. И при добавлении прога стала зависать.Это из-зи винды?

@Lord_Voodoo · 17.02.2010, 16:56

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

@FroL · 20.02.2010, 17:52 **[ТС]**

Создал новое приложение, там все нормально работает.В исходной проге отключил все функции, кроме этой, но не помогло. А можно ли пересобрать приложение, что бы ненужные компоненты удалились?

Добавлено через 21 час 35 минут
Все спасибо разобрался. Не хочу плодить темы поэтому спрошу здесь. Есть запись и надо переместиться к соседней колонке, т.е. вертикально. Как это сделать?

@Lord_Voodoo · 21.02.2010, 11:51

FroL, в источнике данных просто выполнить метод Prior

@FroL · 21.02.2010, 12:00 **[ТС]**

Блин люпус.Я описался.Мне надо переместится горизонтально.Я сделал это через вызов сигнала OnKeyPress для клавиши Tab.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@FroL 61 / 49 / 6 Регистрация: 07.01.2010 Сообщений: 307

	Добавление колонок 20.01.2010, 08:46. Показов 1975. Ответов 17 Метки нет (Все метки) У меня есть таблица с 3 полями(колонками). Мне надо динамически,т.е. кодом, добавить колонку в базу данных, но при добавлении записи в предыдущих стираются .Вижу 2 варианта: 1. Добавить колонку, но что бы старые записи сохранились. 2. Скинуть записи в буфер, а после добавления колонки заново их записать. Использую связь Table->DataSource->DBGrid. 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	20.01.2010, 09:08
	FroL, а ну-ка покажи, как ты добавляешь? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	20.01.2010, 09:35
	FroL, ты решил впихнуть в код все методы класса TTable? 10-11 - переводить таблицу в режим добавления и устанавливать указатель на первую запись совсем не нужно... 17 - это уже точно лишнее, да и field лишнее, можно через fieldbyname все организовать... а еще у меня возникает вопрос - таблица создается постоянно? 0

@FroL 61 / 49 / 6 Регистрация: 07.01.2010 Сообщений: 307
	20.01.2010, 09:38 [ТС]
	нет. Я взял это с Архангельского. Этот код рабочий, только Table->CreateTable стирает все записи. А без нее не добавляется колонка. 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	20.01.2010, 09:45
	FroL, так Архангельского в таком случае я читать не буду, потому что либо ты что-то путаешь и наговариваешь на человека, либо мне такие советы и даром не нужны... а на счет того, что данные исчезают, я могу тебе объяснить - ты постоянно пересоздаешь таблицу и заливаешь данные... таблицу по-хорошему надо создавать, когда ее нет, т.е. хотя бы проверку бы впихнул... 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	20.01.2010, 17:08
	FroL, чтобы редактировать структуру таблицы используйте запрос alter table 0

@FroL 61 / 49 / 6 Регистрация: 07.01.2010 Сообщений: 307
	20.01.2010, 17:11 [ТС]
	А это как? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	20.01.2010, 17:19
	FroL, вы не знакомы с sql? 0

@FroL 61 / 49 / 6 Регистрация: 07.01.2010 Сообщений: 307
	20.01.2010, 18:05 [ТС]
	Нет.А подскажи литературу по SQL. 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.01.2010, 00:00
	найдите папку с установленной BDE, там есть файлик localsql.hlp - для начала хватит 0

@FroL 61 / 49 / 6 Регистрация: 07.01.2010 Сообщений: 307
	21.01.2010, 12:06 [ТС]
	Большое спасибо. 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	17.02.2010, 16:56
	FroL, ну если из всего, что связано с прогой, поменялась только винда, то очень может быть 0

@FroL 61 / 49 / 6 Регистрация: 07.01.2010 Сообщений: 307
	20.02.2010, 17:52 [ТС]
	Создал новое приложение, там все нормально работает.В исходной проге отключил все функции, кроме этой, но не помогло. А можно ли пересобрать приложение, что бы ненужные компоненты удалились? Добавлено через 21 час 35 минут Все спасибо разобрался. Не хочу плодить темы поэтому спрошу здесь. Есть запись и надо переместиться к соседней колонке, т.е. вертикально. Как это сделать? 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	21.02.2010, 11:51
	FroL, в источнике данных просто выполнить метод Prior 1

@FroL 61 / 49 / 6 Регистрация: 07.01.2010 Сообщений: 307
	21.02.2010, 12:00 [ТС]
	Блин люпус.Я описался.Мне надо переместится горизонтально.Я сделал это через вызов сигнала OnKeyPress для клавиши Tab. 0