|
@@ -997,8 +997,9 @@ begin
|
|
begin
|
|
begin
|
|
Result := nil;
|
|
Result := nil;
|
|
AppendText(CreateWarning(Parent), '<NIL>');
|
|
AppendText(CreateWarning(Parent), '<NIL>');
|
|
- end;
|
|
|
|
- if Element.InheritsFrom(TPasUnresolvedTypeRef) then
|
|
|
|
|
|
+ exit;
|
|
|
|
+ end
|
|
|
|
+ else if Element.InheritsFrom(TPasUnresolvedTypeRef) then
|
|
begin
|
|
begin
|
|
s := ResolveLinkID(Element.Name);
|
|
s := ResolveLinkID(Element.Name);
|
|
if Length(s) = 0 then
|
|
if Length(s) = 0 then
|