fix(detector): uMethodName skippt DFM-Event-Handler (SCA106 ~8 FPs)

Selftest-Round-6: VCL-Form-Event-Handler heissen per IDE-Designer-
Konvention 'actSaveExecute', 'btnSaveClick', 'qDataAfterScroll' -
Komponenten-Name als kleingeschriebenes Praefix. PascalCase-Style-Regel
matched dort dauernd ohne dass der Entwickler die Methoden umbenennen
koennte (IDE-Designer regeneriert sie sonst).

Heuristik identisch zu uCanBeClassMethod (Round-3): 1. Parameter
'Sender: TObject' = Event-Handler-Signatur = skip.

Test uTestMethodName nutzt keine TObject-Parameter -> kein Test-Break.

Author: nrodear

StaticCodeAnalyserForm/sources/Detectors/uMethodName.pas

@@ -42,6 +42,26 @@ function LocalName(const FullName: string): string;
     Result := FullName;
 end;
 
+function IsEventHandlerSignature(MethodNode: TAstNode): Boolean;
+// True wenn die Methode eine DFM-Event-Handler-Signatur hat - mind. 1
+// Parameter 'Sender: TObject'. Solche Methoden werden vom Form-Designer
+// per DFM gebunden und tragen per IDE-Konvention den Component-Namen als
+// kleingeschriebenes Praefix (actSaveExecute, btnSaveClick, qDataAfterScroll).
+// Spiegelt die Heuristik aus uCanBeClassMethod (Round-3-Fix); ohne diese
+// produzierte Self-Test auf realem VCL-Form-Code ~8 FPs.
+var
+  Child : TAstNode;
+begin
+  Result := False;
+  for Child in MethodNode.Children do
+  begin
+    if Child.Kind <> nkParam then Continue;
+    if SameText(Child.Name, 'Sender') then Exit(True);
+    if Pos('tobject', LowerCase(Child.TypeRef)) > 0 then Exit(True);
+    Exit;                              // nur ersten Parameter pruefen
+  end;
+end;
+
 class procedure TMethodNameDetector.AnalyzeUnit(UnitNode: TAstNode;
   const FileName: string; Results: TObjectList<TLeakFinding>);
 var
@@ -64,6 +84,9 @@ class procedure TMethodNameDetector.AnalyzeUnit(UnitNode: TAstNode;
       if not CharInSet(Ch, ['A'..'Z','a'..'z']) then Continue;
       // PascalCase = Upper als erstes Zeichen
       if CharInSet(Ch, ['A'..'Z']) then Continue;
+      // Event-Handler (Sender: TObject als 1. Param) -> per IDE-Designer
+      // benannt (actSaveExecute, btnSaveClick, ...). Style-Regel passt nicht.
+      if IsEventHandlerSignature(M) then Continue;
       F            := TLeakFinding.Create;
       F.FileName   := FileName;
       F.MethodName := M.Name;