Variable wurde deklariert aber in XYZ nicht verwendet

[Codehunter]

Hallo,

mich irritiert hier ein Compilerhinweis:

Delphi-Quellcode:

procedure Produce;
var
  D: TDirectory; // <-- [dcc32 Hinweis] foo.pas(123): H2164 Variable 'D' wurde deklariert, aber in 'Produce' nicht verwendet
  S: string;
begin
  for S in D.GetFiles(TheFolder, TheFileMask) do begin

  end;
end;

Heilen kann man das ja so (ist mir klar):

Delphi-Quellcode:

procedure Solve;
var
  S: string;
begin
  for S in TDirectory.GetFiles(TheFolder, TheFileMask) do begin

  end;
end;

Allerdings wüsste ich schon gerne, weshalb die obere Variante einen Hinweis bringt. Denn augenscheinlich wird "D" ja verwendet.

Am Rande bemerkt finde ich es erstaunlich, dass dieser Shortcut für die String-Iteration so funktioniert ohne dass sich das in einer Endlosschleife festläuft.

Grüße
Cody