Ru-Board.club
← Вернуться в раздел «Прикладное программирование»

» Как исправить ошибку

Автор: lorik08
Дата сообщения: 12.05.2013 02:44
[more] Здравствуйте, помогите пожалуйста. Как исправить ошибку:
"Project raised exception class EDatabaseError with message "..." is not a valid integer value for field ".."".

в таблице аксес "Должность" только два столбца ключ и наименование, при нажатии на DBEdit а форме открывается форма "Должность" и в ней выбирается наименование, вот здесь при выборе и выходит эта ошибка, связь через Ado
вот код формы должность:
Код:

unit Unit26;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids, DBGrids;

type
TForm26 = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
DBGrid1: TDBGrid;
procedure Button3Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form26: TForm26;

implementation

uses Unit4, Unit8;

{$R *.dfm}

procedure TForm26.Button3Click(Sender: TObject);
begin
Form4.DBEdit70.Text:= Form26.DBGrid1.SelectedField.AsStri ng;
close;
end;

procedure TForm26.Button1Click(Sender: TObject);
begin
DataModule8.DolgnostT.Insert;
DBGrid1.SetFocus;
end;

procedure TForm26.Button2Click(Sender: TObject);
begin
DataModule8.DolgnostT.Delete;
end;

procedure TForm26.Button4Click(Sender: TObject);
begin
If DataModule8.DolgnostT.Modified then DataModule8.DolgnostT.Post;
end;

end.

И еще почему при создании связей через Field Link Designer перестают отображаться данные на таблицах в форме?
     [/more]
Автор: LadyOfWood
Дата сообщения: 12.05.2013 12:16

Цитата:
Здравствуйте, помогите пожалуйста. Как исправить ошибку:
"Project raised exception class EDatabaseError with message "..." is not a valid integer value for field ".."".

Первое тут этого куска не достаточно и не понятно где вылезает exception, а по теме поставь EurekaLog.
PS. А приложение видно шикарное с 26 одновременно используемыми формами
Автор: YuriyRR
Дата сообщения: 12.05.2013 13:43
При выборе должности значение кода должности (целое) присваивается ключу, а у тебя по видимому ключу присваивается сама должность (строка) - отсюда и ошибка.
Автор: lorik08
Дата сообщения: 12.05.2013 13:46
Спасибо, ошибку исправила, поставила DBLookupComboBox вместо DBEdit, так эта ошибка не выходит. Только вот не пойму почему как создам связи так из таблиц пропадают данные
Автор: mdid
Дата сообщения: 12.05.2013 18:13
lorik08
если так будете объяснять, то вам никто ничего не подскажет, так как вы даете недостаточно данных. По поводу первой ошибки, то вы просто в поле типа integer пихаете не целое число.
Автор: LadyOfWood
Дата сообщения: 12.05.2013 22:19
lorik08
Скорее всего что-то с открытием/закрытием базы.
Автор: YuriyRR
Дата сообщения: 13.05.2013 03:22
lorik08

Цитата:
Только вот не пойму почему как создам связи так из таблиц пропадают данные

Потому что правильные программисты сначала создают связи а потом вставляют данные.
Не нужно разрабатывать программы шиворот-навыворот.
Автор: lorik08
Дата сообщения: 13.05.2013 04:08
[more] Попробую объяснить поподробней.
Структура программы такая:
Первая форма - таблица "Журнал сотрудников" ------> Вторая форма: - форма "редактирование, добавление и просмотр данных " (данные добавляются через DBEdit, DBLookupComboBox)-----> данные в DBLookupComboBox берем из форм таблиц-справочников. Все таблицы в БД Access, связала с помощью ADO.
Таблицы-справочники уже заполнены в Access, но их можно редактировать. Без связей, при работе программы, все данные в справочниках видны, но как только и я создаю связи через Field Link Designer между таблицами например так: "журнал сотрудников" ------> "личные данные"------>"образование" ------> " полученная специальность" , данных не видно. Почему и как это можно исправить.
Я уже и связи в Access и убирала и опять устанавливала, ничего не помогает


http://imageshack.us/g/203/52638610.png/- здесь фото форм, я бы и программу выложила только как не знаю
[/more]

Страницы: 1

Предыдущая тема: Вопросы по Embarcadero RAD Studio XE4


Форум Ru-Board.club — поднят 15-09-2016 числа. Цель - сохранить наследие старого Ru-Board, истории становления российского интернета. Сделано для людей.