diff --git a/components/codetools/codecompletiontool.pas b/components/codetools/codecompletiontool.pas
index 0784ab37f8..fdb65d3d3b 100644
--- a/components/codetools/codecompletiontool.pas
+++ b/components/codetools/codecompletiontool.pas
@@ -1076,7 +1076,7 @@ begin
           DebugLn('  CompleteLocalVariableAsParameter Procedure does not have so many parameters');
           exit;
         end;
-        TypeNode:=ParameterNode.FirstChild;
+        TypeNode:=FindTypeNodeOfDefinition(ParameterNode);
         if TypeNode=nil then begin
           DebugLn('  CompleteLocalVariableAsParameter Parameter has no type');
           exit;