![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как перекрыть абстрактную функцию с другими параметрами?
ГостьНомер © (2006-06-20 14:22:00)Я хочу запускать свою функцию в потоке TMyThread. У функции есть параметры.
Как мне объявить метод Execute моего класса так, чтобы он принимал параметры и мог передать их функции?
Объявляю так:
TMyThread = class (TThread)
procedure execute (a:real); override;
end;
И реализация:
procedure TMyThread.execute (a:real);
begin
MyFunction(a);
end;
Выдает ошибку Declaration of 'execute' differs from previous declaration,
что вполне ожидаемо. Без override в runtime получаем Abstract Error.
Пробовал думать. Пробовал добавлять reintroduce, virtual, overload в разных комбинациях.
Не получилось. Как передать параметры, не используя глобальных переменных?
Сергей М. (2006-06-22 13:54:00) [1]
> абстрактную функцию
Разницу между функциональным и процедурным методом объектаощущаешь ?
ГостьНомер (2006-06-22 13:14:00) [2]2icWasya Огромное спасибо. Действительно, мы создаем поток create(false), и он сам вызывает execute. Все заработало.
icWasya (2006-06-21 09:42:00) [3]После таких [3] ответов появится серия вопросов
1) почему у меня поток не запускается
2)почему у меня Access violation
3) ещё что нибудь
Execute у TThread Вы никогда явно не вызываете!
Скорее всего Вам нужно сделать так
Интерфейс:
TMyThread = class (TThread)
private
Fa : real;
public
procedure execute ; override;
constructor Create(a:real);
end;
И реализация:
constructor TMyThread.Create(a:real);
begin
Fa:=a;
inherited Create;
end;
procedure TMyThread.execute;
begin
MyFunction(Fa);
end;
oleg__ (2006-06-20 14:44:00) [4]TObj1 = class
procedure Execute(a: int); virtual;
TObj2 = class(TObj1)
procedure Execute(s: string; a: int); reintroduce;
TObj2.Execute(s: string; a: int);
begin
inherited Execute(a);
// свой код
................
Сергей М. (2006-06-20 14:30:00) [5]
> Пробовал думать
Плохо пробовал думать.
Или Пробовал плохо думать.
Или не думал вообще.
Виртуальный метод м.б. перекрыт методом с той жедекларрацией, что и перекрываемый метод.
Object Pascal, понимаешь ли .. Выше штанов не прыгнешь)
tesseract (2006-06-20 14:23:00) [6]
> Как передать параметры, не используя глобальных переменных?
просто, делам функцию myExecute и вызываем её из execute.
больше никаких проблем.