Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Lazarus, Free Pascal, CodeTyphon
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.10.2010, 22:30   #1
Selestis
Форумчанин
 
Аватар для Selestis
 
Регистрация: 21.01.2009
Сообщений: 719
По умолчанию Перегрузка операторов Lazarus

Люди добрые, ни у кого нет примера перегрузки опраторов в lazarus? А то все найденные примеры под Delphi, а их он видимо не ест...

Update:
Нашёл пример всё-таки, но встала новая проблема. Делал по этому примеру:
Код:
TYPE
TComplex=RECORD
RePart,ImPart:Real;
END;
OPERATOR + (a,b:TComplex)RESULT:TComplex;
BEGIN
WITH RESULT DO
BEGIN
RePart:=x.RePart+y.RePart;
ImPart:=y.ImPart+y.ImPart;
END;
END;
НО, сделав свой вариант таким образом:
Код:
  _D3DVECTOR = packed record
    x: Single;
    y: Single;
    z: Single;
  end {_D3DVECTOR};
operator + (v1,v2: _D3DVECTOR) Result: _D3DVECTOR;
begin
   Result.x:=v1.x+v2.x;
   Result.y:=v1.x+v2.y;
   Result.z:=v1.x+v2.z;
end;
получаю ругань "Fatal: Syntax error, "=" expected but "+" found" на строчке с объявлением оператора...

Что я делаю неправильно?

Правка 2:
Нашёл решение сам, тему можно закрывать.
Изобретатель велосипедов

Последний раз редактировалось Selestis; 09.10.2010 в 23:31. Причина: Проблема решена
Selestis вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перегрузка операторов в С++ Purr Помощь студентам 0 09.10.2010 15:12
перегрузка операторов mashuta_ya Общие вопросы C/C++ 0 01.10.2010 18:54
Перегрузка операторов raspberry Общие вопросы C/C++ 2 06.04.2010 00:19
Перегрузка операторов. Macb3th Общие вопросы C/C++ 5 01.04.2010 21:14
Перегрузка операторов, Организация перегрузки операторов chagin_yav Помощь студентам 2 12.05.2008 09:15