Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Динамическое событие / 4 сообщений из 4, страница 1 из 1
13.06.2003, 00:19
    #32182141
Петр
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое событие
Пожалуйста подскажите как определить выполнение процедуры для динамически созданного объекта (TADODataSet)
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
var
DataSetS : TADODataSet;
begin
  DataSetS := TADODataSet.Create( nil );
                      ***
  DataSetS.BeforePost := <сдесь надо выполнить процедуру>
                      ***
end;


Может кто-то подскажет ссылку :-))
...
Рейтинг: 0 / 0
13.06.2003, 01:02
    #32182143
KirillovA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое событие
без обладания телепатическими талантами ни один програмер тебе ни скажет как ето сделать ... под неизвестную субду под неизвестной осью могу сказать - телепат ето ты ... и если есть уверенность что все юзают то что ты - напиши хотябы ...
...
Рейтинг: 0 / 0
13.06.2003, 02:04
    #32182148
[NIKEL]
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое событие
объявляешь процедуру MyBeforePost в классе формы

void MyBeforePost(TDataSet *DataSet);

описываешь

void __fastcall TForm1::MyBeforePost(TDataSet *DataSet)

{
if (DBEdit1->Text == "")
Abort();
}



begin
DataSetS := TADODataSet.Create( nil );
***
DataSetS.BeforePost := MyBeforePost;
***
end;

немножко в перемежку с С++, но разницы нет.

А ссылки они всегда одни, в HELP.
...
Рейтинг: 0 / 0
13.06.2003, 15:28
    #32182316
Петр
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Динамическое событие
То [NIKEL], спасибо так и сделал работает...
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Динамическое событие / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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