Не сохраняет данные в таблицу - БД в Delphi - Страница 2

liienna · 02.04.2009, 12:00

Цитата:

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

Т а вы сами писали проект?
у вас перепутаны вызовы справочников - по справочнику "школа" заполняется таблица - призовые места, и наоборот

Ой, правда!!!.....да, сама...я это ночью писала, во т и напутала...

Заполнила справочник, но при сохранении та же ошибка появляется.

Dark_Spirit · 02.04.2009, 12:28

Код:

procedure TForm2.Button4Click(Sender: TObject);

begin
 dm.ADOTable1.Edit;
 dm.ADOTable2.Edit;
//if DM.ADOTable1.Modified then
 DM.ADOTable1.Post;
 //   if DM.ADOTable2.Modified then
 DM.ADOTable2.Post;
end;

попробуйте изменить таким вот образом вашу процедуру
дальше: поставьте свойство DataField компонента DBLookupComboBox1 равным "Номер школы"

liienna · 02.04.2009, 12:41

Цитата:

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

[code]
попробуйте изменить таким вот образом вашу процедуру
дальше: поставьте свойство DataField компонента DBLookupComboBox1 равным "Номер школы"

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

Dark_Spirit · 02.04.2009, 12:45

а вы все поля что у вас на форме размещены заполняете?
и те что на закладках?

liienna · 02.04.2009, 12:53

Цитата:

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

а вы все поля что у вас на форме размещены заполняете?
и те что на закладках?

Да!!!...все заполняется, но не сохраняет!.....в справочники без проблем все записывает, а сюда нет.

Dark_Spirit · 02.04.2009, 13:08

Код:

procedure TForm2.Button4Click(Sender: TObject);

begin
dm.ADOTable1.Edit;

//if DM.ADOTable1.Modified then
DM.ADOTable1.Post;
dm.ADOTable1.Refresh;

dm.ADOTable2.Edit;
dm.ADOTable2.Fields.FieldByName('Код ученика').Value:=dbedit1.Text;
 //   if DM.ADOTable2.Modified then
DM.ADOTable2.Post;
end;

уже работает и сохраняет

liienna · 02.04.2009, 13:41

Цитата:

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

уже работает и сохраняет

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

Для DBLookupComboBox1 в свойстве DataFiled надо же указывать поле "Номер школы"?

.....скиньте мне пожалуйста на ящик liienna@mail.ru работающую програмку

Dark_Spirit · 02.04.2009, 13:49

Цитата:

Для DBLookupComboBox1 в свойстве DataFiled надо же указывать поле "Номер школы"?

аха...
отправил

liienna · 02.04.2009, 15:32

СПАСИБО большое при большое за помощь!!!!!!!!!!!!!!!!!!!!!!!!!!!
Теперь все идет как надо!!!!!!!!!!!!!!!!!!

02.04.2009, 12:28	#12
Dark_Spirit Форумчанин Регистрация: 05.02.2009 Сообщений: 324	Код: `procedure TForm2.Button4Click(Sender: TObject); begin dm.ADOTable1.Edit; dm.ADOTable2.Edit; //if DM.ADOTable1.Modified then DM.ADOTable1.Post; // if DM.ADOTable2.Modified then DM.ADOTable2.Post; end;` попробуйте изменить таким вот образом вашу процедуру дальше: поставьте свойство DataField компонента DBLookupComboBox1 равным "Номер школы" Тяжело быть бестолковым.....

02.04.2009, 12:45	#14
Dark_Spirit Форумчанин Регистрация: 05.02.2009 Сообщений: 324	а вы все поля что у вас на форме размещены заполняете? и те что на закладках? Тяжело быть бестолковым.....

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как вставить в таблицу Excel данные из текстового файла	Диагностик	Microsoft Office Excel	8	13.12.2009 13:50
Читать фаил и регистрировать данные в таблицу или матрицу	ciaonataha	Общие вопросы C/C++	3	26.03.2009 10:59
Как данные с массива передавать на тренд и таблицу?	KuevProger	Помощь студентам	1	20.03.2009 11:47
Данные с DBLookupComboBox в таблицу	rainbow	БД в Delphi	2	17.10.2008 12:18
Не сохраняет данные в таблицу!	frai	БД в Delphi	14	15.09.2007 18:58

02.04.2009, 15:32	#19
liienna Пользователь Регистрация: 24.02.2009 Сообщений: 25	СПАСИБО большое при большое за помощь!!!!!!!!!!!!!!!!!!!!!!!!!!! Теперь все идет как надо!!!!!!!!!!!!!!!!!!