Добавление в базу записи, возникла проблема

← →
neVIP (2004-03-16 17:57) [0]

Доброго времени суток Мастера...
Возникла у меня такая проблема : Нужно изменить запись в базе, пишу я такой код :

procedure TMain_Form.EditSBClick(Sender: TObject);
var Dt : string;
begin
Dt:=MaskEdit1.Text;
if ((Copy(Dt,0,2)=" ")
or (Copy(Dt,4,2)=" ")
or (Copy(Dt,7,2)=" "))
then ShowMessage("""+MaskEdit1.Text+"" - неверная дата !")
else
if WorkSt.CanModify=true then
begin
WorkSt.Edit;
WorkSt.FieldByName("Дата").AsString:=MaskEdit1.Text;
WorkSt.Post;
end
else ShowMessage("Редактирование невозможно");
end;

А Delphi мне ругается : то "Index is read only",
то "Record locked by another user"...
И причём, CanModify всегда true, индекс по полю я убрал, но всё равно ругаеться, да я считаю что и не в этом дело.
Подскажите, как с этим справиться, заранее всем спасибо...

← →
Алхимик © (2004-03-16 20:48) [1]

А почему дату по человечески не хранить в таблице?
WorkSt что такое?
Структуру таблицы посмотреть бы...

← →
neVIP (2004-03-16 23:28) [2]

WorkSt = ТTable
Поле "Дата" - тип Date.
Дата и так храниться в таблице, правда по машинному...
Мне нужно, что бы юзер мог изменить дату, а не меняеться она, млин..
Раньше у меня проблем с изменением записи не было, а тут - на тебе!

← →
Алхимик © (2004-03-16 23:37) [3]

TDateTimePicker для изменения даты не судьба использовать вместо извращений с MaskEdit?
Поля по русски называть тоже не есть гуд.

← →
neVIP (2004-03-20 00:20) [4]

Короче забил я на Table и ушёл в Query... и Delphi больше не ругаеться...

Добавление в базу записи, возникла проблема Найти похожие ветки