Аналог TNotifyEvent для функций - Общие вопросы Delphi

RebOOter · 03.06.2011, 20:32

Возникла необходимость использовать вместо обычных процедур функции, которые бы возвращали значение string. Пытаюсь создать что-то вроде лога действий. Проблема в том, что TNotifyEvent не воспринимает функции, только процедуры вида procedure NAME(Sender: TObject).
Подскажите, чем можно заменить TNotifyEvent

Пепел Феникса · 03.06.2011, 20:43

что опишите, тем и замените.
стандартные классы естественно не измените(можно, но не надо)

RebOOter · 03.06.2011, 20:45

Опишу проблему более подробно. Функцию я хочу использовать как переменную в объекте, дабы в последствии я мог присвоить ей нужное значение. Написать свое подобное я не знаю как, а уж в стандартные лезть еще страшнее...

Можно сделать примерно вот так?

Код:

TNotifyEvent = procedure(Sender: TObject) of object;

заменить на

Код:

GEventLog = function(Sender: TObject): string of object;

З.Ы. Да можно. Круто! Спасибо

Пепел Феникса · 03.06.2011, 20:55

а проверить религия не позволяла?

конечно можете.

RebOOter · 03.06.2011, 21:03

Позволяла, страшно просто, вдруг сломаю чего =)

03.06.2011, 20:32	#1
RebOOter Регистрация: 03.06.2011 Сообщений: 7	Аналог TNotifyEvent для функций Возникла необходимость использовать вместо обычных процедур функции, которые бы возвращали значение string. Пытаюсь создать что-то вроде лога действий. Проблема в том, что TNotifyEvent не воспринимает функции, только процедуры вида procedure NAME(Sender: TObject). Подскажите, чем можно заменить TNotifyEvent

03.06.2011, 20:43	#2
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	что опишите, тем и замените. стандартные классы естественно не измените(можно, но не надо) Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

03.06.2011, 20:45	#3
RebOOter Регистрация: 03.06.2011 Сообщений: 7	Опишу проблему более подробно. Функцию я хочу использовать как переменную в объекте, дабы в последствии я мог присвоить ей нужное значение. Написать свое подобное я не знаю как, а уж в стандартные лезть еще страшнее... Можно сделать примерно вот так? Код: `TNotifyEvent = procedure(Sender: TObject) of object;` заменить на Код: `GEventLog = function(Sender: TObject): string of object;` З.Ы. Да можно. Круто! Спасибо Последний раз редактировалось RebOOter; 03.06.2011 в 20:55.

03.06.2011, 20:55	#4
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	а проверить религия не позволяла? конечно можете. Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Аналог GetTickCount для Паскаля	k1r1ch	Паскаль, Turbo Pascal, PascalABC.NET	5	14.05.2011 07:59
Аналог функции fscanf для дельфи?	VLAD2	Помощь студентам	1	07.01.2011 15:31
Аналог функции rand() для типа float	Linel	PHP	1	01.06.2009 21:01
Аналог функции GetObject из VB для Делфи?	Stilet	Общие вопросы Delphi	1	29.04.2009 17:46
нужен аналог строковых функций	DOS	Общие вопросы C/C++	4	05.01.2008 00:05

03.06.2011, 21:03	#5
RebOOter Регистрация: 03.06.2011 Сообщений: 7	Позволяла, страшно просто, вдруг сломаю чего =)