powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TOracleDataSet.Cancel ????
5 сообщений из 5, страница 1 из 1
TOracleDataSet.Cancel ????
    #32184102
Alex_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Podskajite ludi dobrie chto zdes' netak

procedure TMainF.OraTable1BeforePost(DataSet: TDataSet);
begin
if (OraTable1.FieldByName('STATE').AsString<>'0')
then begin
ShowMessage ('Error Text');
DataSet.Cancel;
Exit;
end;


Pri srabativanii etogo Event-a v tablitsu dobavliaetsia zapis'
identichnaia toi na kotoroi naxodilsia kursor v moment srabativania.

Pmogite razobrat'sia!!!!!!
...
Рейтинг: 0 / 0
TOracleDataSet.Cancel ????
    #32184105
Фотография KirillovA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а че за ошибка?
...
Рейтинг: 0 / 0
TOracleDataSet.Cancel ????
    #32184110
Alex_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kak che za oshibka.
Esli ia pravil'no ponimau on doljen prosto ostanovit' Post i vse,
a on eshe odnu zapis' v tablitsu dobavlaiet.
...
Рейтинг: 0 / 0
TOracleDataSet.Cancel ????
    #32184118
Фотография KirillovA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
это ктоже ето ходит к ораклу или сиквелсерверу таблицей?
в режиме отладки пройдись по твоему исходнику - у тя наверняка постит гдето ..
...
Рейтинг: 0 / 0
TOracleDataSet.Cancel ????
    #32184136
Alex_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 KirillovA
Inogda prixodit'sia

A problemu reshil tak


procedure TMainF.OraTable1BeforePost(DataSet: TDataSet);
begin
if (OraTable1.FieldByName('STATE').AsString<>'0')
then begin
ShowMessage ('Error Text');
Abort;
Exit;
end;


Vsem spasibo
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TOracleDataSet.Cancel ????
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]