Значения аргументов по умолчанию

[carno]

Все привет. Видимо что то у меня, т.к. в гугле это никого не волнует. Но как установить значения аргументов функций по умолчанию. В дельфи все просто

Код: Выделить всё

function MyFunc(str:String='default'):String;

но в лазурусе выдает ошибку

Код: Выделить всё

Fatal: Syntax error, ")" expected but "=" found

что же делать?

[dunin]

Как-то так:

Код: Выделить всё

function MyFunc(MyStr:String='default'):String;

Подробнее:
http://community.freepascal.org:10000/d ... m/str.html

[sign]

У меня работает.
v0.9.31
FPC 2.5.1

Код: Выделить всё

function ST(const S: string='Молча'): String;

implementation
{$R *.lfm}

function ST(const S: string='Молча'): String;
begin
  if S = 'Молча' then Result := 'Да'
  else Result := 'Нет';
end;

[Nik]

что же делать?

Версию FPC/Lazarus уточните.

[carno]

Lazarus version: 0.9.30-0
Lazarus was compiled for i386-linux
Lazarus was compiled with fpc 2.4.2
____________
Извиняйте пжалста, оно пичинилось ,не знаю как, но щас стало нормально, раз 100500 пересобрал редактор и все нормально стало