Работа с combobox?

@eiza09 · Регистрация: 29.02.2016

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

есть форма которая прикреплена. там происходит добавление в таблицу базы данных. В одном из полей есть combobox написала такой код на кнопу для добавления

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure TForm6.btn1Click(Sender: TObject);
begin
Form6.sp1.Prepared;
try
  Form6.sp1.ProcedureName:= 'Dobavlenie_prikazov_o_nagradax';
  Form6.sp1.Parameters.Refresh() ;
 Form6.sp1.Parameters.ParamByName('@Дата_ходатайства').Value:=(edt1.Text);
      Form6.sp1.Parameters.ParamByName('@ФИО_спортсмена').Value:=(edt2.Text);
    Form6.sp1.Parameters.ParamByName('@Награды').Value:= (CbB1.Text);//ЭТУ СТРОКУ ВЫДЕЛЯЕТ
    Form6.sp1.Parameters.ParamByName('@Представляемая_организация').Value:=(edt3.Text);
    Form6.sp1.Parameters.ParamByName('@Реквизиты_приказа_о_наградах').Value:=(edt4.Text);
    Form6.sp1.Parameters.ParamByName('@Отметка_о_вручении').Value:=(edt5.Text);
    Form6.sp1.Parameters.ParamByName('@Дата_присвоения').Value:=(edt6.Text);
        Form6.sp1.Parameters.ParamByName('@Вид_спорта').Value:=(edt7.Text);
;Form6.sp1.ExecProc;
finally
Form6.sp1.Prepared:=not( Form6.sp1.Prepared);
end;

программа ругается на выдленную строку, т.е где прописан combobox/ Подскажите как исправить ошибку

@qwertehok · 05.12.2016, 13:26

Сообщение от eiza09

программа ругается на выдленную строку

во первых какая у вас строка выделе?
во вторых - как ругается?

@eiza09 · 05.12.2016, 13:50 **[ТС]**

Delphi
1
Form6.sp1.Parameters.ParamByName('@Награды').Value:= (CbB1.Text);

@qwertehok · 05.12.2016, 13:53

а процедуру покажите которую вызываете

@eiza09 · 05.12.2016, 13:54 **[ТС]**

SQL
1
2
3
4
5
6
7
8
9
10
11
12
CREATE PROCEDURE Dobavlenie_prikazov_o_zvanie
@Дата_ходотайства datetime,
@ФИО_спортсмена nvarchar(100),
 @Вид_спорта nvarchar(100),
@Представляемая_организация nvarchar(100),
 @Реквизиты_приказа_о_присвоении nvarchar(100),
@Отметка_о_вручении bit,
  @Звание nvarchar(100)
AS
        INSERT INTO Приказы_о_званиях(Дата_ходотайства, ФИО_спортсмена, Вид_спорта, Представляемая_организация, Реквизиты_приказа_о_присвоении, Отметка_о_вручении, Звание)
    VALUES (@Дата_ходотайства,@ФИО_спортсмена,@Вид_спорта,@Представляемая_организация,@Реквизиты_приказа_о_присвоении,@Отметка_о_вручении,@Звание);
GO

@qwertehok · 05.12.2016, 13:55

и что? не понятно почему ошибка?
у вас в процедуре третий параметр @Вид_спорта
а вы в коде передаете @Награды

@eiza09 · 05.12.2016, 14:05 **[ТС]**

Если даже поменяь он все равно выводит такую же ошибку. Может я не праивльно написала добавление из combobox данные в таблицу?

Добавлено через 6 минут
Где порле добавление награды выводится поля из другой таблицы в combobox. Я не мастер в этом деле не разбераюсь в combobox.

@qwertehok · 05.12.2016, 15:11

Сообщение от eiza09

Если даже поменяь он все равно выводит такую же ошибку.

а вы поменяйте и покажите ошибку

Сообщение от eiza09

Я не мастер в этом деле не разбераюсь

я тоже не разбераюсь

@eiza09 · 06.12.2016, 09:19 **[ТС]**

Ошибка идинтичная тому что я высылала раньше. Ну если вы сами не понимаетет зачем тогда пишите!? мне нужна помощь я его и прошу если вы не можете предоставить ответа то лучше не писать.

@qwertehok · 06.12.2016, 12:00

у вас ошибка в том что вы неверные параметры передаете в процедуру
если не понимаете что вы делаете - не пишите на делфи, откройте учебник, почитайте

Новые блоги и статьи Все статьи Все блоги /
Валидация и контроль данных табличной части документа перед записью Maks 22.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .	Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .

@qwertehok 5989 / 4564 / 1096 Регистрация: 29.08.2013 Сообщений: 28,207 Записей в блоге: 3
	05.12.2016, 13:53
	а процедуру покажите которую вызываете 0

@qwertehok 5989 / 4564 / 1096 Регистрация: 29.08.2013 Сообщений: 28,207 Записей в блоге: 3
	05.12.2016, 13:55
	и что? не понятно почему ошибка? у вас в процедуре третий параметр @Вид_спорта а вы в коде передаете @Награды 0

@eiza09 0 / 0 / 0 Регистрация: 29.02.2016 Сообщений: 54
	05.12.2016, 14:05 [ТС]
	Если даже поменяь он все равно выводит такую же ошибку. Может я не праивльно написала добавление из combobox данные в таблицу? Добавлено через 6 минут Где порле добавление награды выводится поля из другой таблицы в combobox. Я не мастер в этом деле не разбераюсь в combobox. 0

@eiza09 0 / 0 / 0 Регистрация: 29.02.2016 Сообщений: 54
	06.12.2016, 09:19 [ТС]
	Ошибка идинтичная тому что я высылала раньше. Ну если вы сами не понимаетет зачем тогда пишите!? мне нужна помощь я его и прошу если вы не можете предоставить ответа то лучше не писать. 0

@qwertehok 5989 / 4564 / 1096 Регистрация: 29.08.2013 Сообщений: 28,207 Записей в блоге: 3
	06.12.2016, 12:00
	у вас ошибка в том что вы неверные параметры передаете в процедуру если не понимаете что вы делаете - не пишите на делфи, откройте учебник, почитайте 0

Опции темы