Помогите решить проблему по удалению записи из DBGrid.

[Stilet]

прочитать значение у DM.ADOQ_PACid_pacienta.DataSet.RecN o если DM.ADOQ_PAC в этот момент закрыт?

А я и не говорил об этом.
Прочитать это можно раньше до закрытия. И вообще стратегия выбранная автором не замая удачная.

Естесственно что на закрытом наборе нельзя узнать его свойство, но я говорил о принципе. Вот Evgeniy26 тее показал.

у меня все работает но че то очень криво

Почему ты так думаешь?

а как тогда редактировать ?

Командой SQL - UPDATE )

[Droid]

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

А я и не говорил об этом.
Прочитать это можно раньше до закрытия. И вообще стратегия выбранная автором не замая удачная.

Естесственно что на закрытом наборе нельзя узнать его свойство, но я говорил о принципе. Вот Evgeniy26 тее показал.


Почему ты так думаешь?

а как тогда редактировать ?

Командой SQL - UPDATE )

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

он какой то не коректный мне кажется ( как нибудь можно программно добавить строку пустую для вноса информации кроме как сослаться на кнопку дб навигатора ?
GL_F.DBNavigator1.BtnClick(nbInsert );

[Stilet]

UPDATE это же обновить

Это не просто обновить, это изменить данные т.е. редактировать:

Допустим есть таблица с ключевым полем ID тогда в поле q на запись с ID=1 будет вписана единичка. Это выполняется тоже через ExecSQL

UPDATE [Таблица1] SET q=1 where ID=1

[Droid]

Безымянный.jpg - при удаление выдало ошибку ( у меня таблица пациента свяана со многими таблицами в MySQL Front и там стоят ограницения между ними... почему не удаляется? в чем касяк ?

[SlavaSH]

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

Вложение 13318 - при удаление выдало ошибку ( у меня таблица пациента свяана со многими таблицами в MySQL Front и там стоят ограницения между ними... почему не удаляется? в чем касяк ?

чтобы тебе удалить эту запись тебе нужно удалить все ссылки на неё.

К примеру если у тебя есть справочник пациентов, то ты должен со всех таблиц, где встречается этот пациент сначала удалить этого пациента, а потом можно будет удалить его из справочника. Можно это сделать программно, если в этом есть необходимость.

[Droid]

ну у допустим в 5 справочниках, прикреплен ID_pacienta к ним.Че надо сделать ? Например у меня есть "наличие инвалидности" id_invslidnosti и там же есть FK id_pacienta, в таблице наличие инвалидности, наложено ограничение на таблицу пациентов ...

[Droid]

Безымянный.jpg - тут бд

[SlavaSH]

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

ну у допустим в 5 справочниках, прикреплен ID_pacienta к ним.Че надо сделать ? Например у меня есть "наличие инвалидности" id_invslidnosti и там же есть FK id_pacienta, в таблице наличие инвалидности, наложено ограничение на таблицу пациентов ...

в общем должно быть так:

сначала удаляешь со всех таблиц, где встречается поле, связанное с id_pacienta все записи. Я не знаю сколько там у тебя таблиц, но примерно так:

DM.ADOCommand.CommandText:='DELETE FROM Table1 WHERE id_pacienta=:D';
DM.ADOCommand.Parameters.ParamByName('D').Value:=DM.ADOQ_PACid_pacienta.Value;
DM.ADOCommand.Execute;

DM.ADOCommand.CommandText:='DELETE FROM Table2 WHERE id_pacienta=:D';
DM.ADOCommand.Parameters.ParamByName('D').Value:=DM.ADOQ_PACid_pacienta.Value;
DM.ADOCommand.Execute;

DM.ADOCommand.CommandText:='DELETE FROM Table3 WHERE id_pacienta=:D';
DM.ADOCommand.Parameters.ParamByName('D').Value:=DM.ADOQ_PACid_pacienta.Value;
DM.ADOCommand.Execute;

и последним действием удалишь эту запись со справочника:

DM.ADOCommand.CommandText:='DELETE FROM pacient WHERE id_pacienta=:D';
DM.ADOCommand.Parameters.ParamByName('D').Value:=DM.ADOQ_PACid_pacienta.Value;
DM.ADOCommand.Execute;

Если на первые таблицы тоже есть какие-то ссылки, то сначала нужно будет удалить все данные из этих таблиц. В общем все очень сложно!

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

[Droid]

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

Если на первые таблицы тоже есть какие-то ссылки, то сначала нужно будет удалить все данные из этих таблиц. В общем все очень сложно!

Что такое первые таблицы ? вот по моей физической модели, я спрева удаляю id_pacienta, из таблиц которые присоединены к таблице PACIENT ?

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

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

А вдруг он умер или перехал в др город...

[SlavaSH]

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

Что такое первые таблицы ? вот по моей физической модели, я спрева удаляю id_pacienta, из таблиц которые присоединены к таблице PACIENT ?

ну я не знаю твою структуру, не разбирался в ней....

вот, например, у меня есть такая база, в которой такая структура:

3 таблицы связано таким образом

счета связаны с таблицей товаров по номеру товара
таблица товаров связана с таблицей стран по номеру страны.

Получается, чтобы мне удалить страну из справочника надо удалить все товары этой страны, а по этим товарам могут быть выписаны счета, поэтому нужно удалить все счета на эти товары.
Может быть еще сложнее структура. Если у тебя есть, что-то подобное, то тебе сложно будет организовать удаление программно.
Но если у тебя база данных Access, то там вообще все элементарно. Там в схеме данных есть очень полезная фишка:
в связях можно настроить каскадное удаление связанных записей. Тогда вообще проблем с удалением не возникнет!

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

А вдруг он умер или перехал в др город...

Ну и оставь его в покое. Даже если больница (или что там у тебя) больше не обслуживает клиента, записи о проделанной работе то не должны удаляться.
Ты по сути удаляешь всю историю этого пациента, что не совсем разумно.

Если тебя напрягает, что в справочнике постоянно висит пациент, которого уже и в помине нет, то можно добавить поле логического типа, в котором ты и будешь ставить отметку нужен этот клиент в справочнике или нет. А в таблице отображай записи, у которых в этом поле значение стоит false.