[Delphinic]

Вот к примеру такой кусок программы.

case pattern^ of '*': if MatchPattern(element, @pattern[1]) then
Result := True
else
Result := MatchPattern(@element[1], pattern);
'?': Result := MatchPattern(@element[1], @pattern[1]);
else
if element^ = pattern^ then
Result := MatchPattern(@element[1], @pattern[1])
else
Result := False;
end;
end;

Дельфи ругается Incompatible types на все строчки где есть @pattern
Ему не нравится @. Почему не пойму. Это уже не в первой.