Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.05.2012, 18:51   #11
Venzel
Пользователь
 
Регистрация: 11.12.2011
Сообщений: 14
По умолчанию

Цитата:
Сообщение от googl Посмотреть сообщение
Заполнялась где и в чем?
Заполнялась таблица вот так
Venzel вне форума Ответить с цитированием
Старый 17.05.2012, 22:16   #12
googl
Форумчанин
 
Регистрация: 05.06.2010
Сообщений: 154
По умолчанию

Цитата:
Сообщение от Venzel Посмотреть сообщение
Заполнялась таблица вот так
еще раз спрашиваю: заполнялось где? в базе было заполнено?
googl вне форума Ответить с цитированием
Старый 17.05.2012, 23:57   #13
Venzel
Пользователь
 
Регистрация: 11.12.2011
Сообщений: 14
По умолчанию

Цитата:
Сообщение от googl Посмотреть сообщение
еще раз спрашиваю: заполнялось где? в базе было заполнено?
Ты скрин смотрел? В базе конечно.
Venzel вне форума Ответить с цитированием
Старый 18.05.2012, 00:05   #14
googl
Форумчанин
 
Регистрация: 05.06.2010
Сообщений: 154
По умолчанию

var
mas:array [1..12] of string;
begin
mas[1]:='Январь';
mas[2]:='Фeвраль';
................
mas[12]:='Декабрь';
for i:=1 to 12 do
begin
adoquery1.active:=false;
adoquery1.Sql.Text:='insert into Название таблицы (поле1) values ('+chr(39)+mas[i]+chr(39)+')';
adoquery1.ExecSql;
end;
googl вне форума Ответить с цитированием
Старый 18.05.2012, 16:22   #15
Venzel
Пользователь
 
Регистрация: 11.12.2011
Сообщений: 14
По умолчанию

Цитата:
Сообщение от googl Посмотреть сообщение
var
mas:array [1..12] of string;
begin
mas[1]:='Январь';
mas[2]:='Фeвраль';
................
mas[12]:='Декабрь';
for i:=1 to 12 do
begin
adoquery1.active:=false;
adoquery1.Sql.Text:='insert into Название таблицы (поле1) values ('+chr(39)+mas[i]+chr(39)+')';
adoquery1.ExecSql;
end;
Спасибо, сработало.

Еще вопрос: в поле "Номер заявки" хочу вставить значение из Edit, не знаю что писать в скобках. Пробовал по разному, не получается.
Код:
form3.adoquery1.active:=false;
form3.adoquery1.Sql.Text:='insert into Заявка(Периоды) values ('+chr(39)+mas[i]+chr(39)+')';
form3.ADOQuery1.SQL.Text:='insert into Заявка(Номер заявки) values ()';
form3.adoquery1.ExecSql;
Venzel вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Хранение данных в функции Missamenity Microsoft Office Excel 5 29.03.2011 22:06
Хранение данных C++ Memfis_nya Помощь студентам 8 16.11.2010 09:28
Хранение данных puKo Общие вопросы Delphi 17 21.09.2009 16:08
хранение данных в файле (dc++) AsabeasT Общие вопросы Delphi 2 27.03.2009 11:57
Хранение и шифрование данных Paul Hindenburg БД в Delphi 1 20.08.2007 09:04