VPF::Тип переменной,чтоб процедуру в нее записать

aniaprogrammist

Дата 25.9.2013, 12:51 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 29.1.2013

Репутация: нет
Всего: нет

Здравствуйте. Какой тип переменной в Delphi нужно указать переменной, чтобы потом ей можно было присвоить процедуру?

Poseidon

Дата 25.9.2013, 12:56 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 9
Всего: 133

Код


TMyProcedure = procedure: string of object

Добавлено через 59 секунд
http://www.delphibasics.ru/Object.php

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

Alexeis

Дата 25.9.2013, 22:06 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 34
Всего: 459

of object это же для функций объекта. Автор об этом явно не спрашивал. Для обычных функций никаких of object иначе выдаст ошибку несоответствия типов.

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

Poseidon

Дата 26.9.2013, 00:03 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 9
Всего: 133

Цитата(Alexeis @ 25.9.2013, 22:06

)

Для обычных функций никаких of object иначе выдаст ошибку несоответствия типов.

Да, виноват, заработался. of object не надо.

aniaprogrammist, вот пример:

Код


procedure ShowMyMessage(MyMessage: string);
begin
  ShowMessage(MyMessage)
end;

type
  TMyProcedure = procedure(MyMessage: string);

procedure TForm1.Button1Click(Sender: TObject);
var
  MyProcedure: TMyProcedure;
begin
  MyProcedure := ShowMyMessage;
  MyProcedure('Hello World')
end;

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

bems

Дата 27.9.2013, 17:52 (ссылка)

(голосов:1)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 18
Всего: 88

Цитата(Alexeis @ 25.9.2013, 22:06

)

то есть procedure: string это нормально? smile

--------------------

Обижено школьников: 8

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »