diff --git a/components/lazutils/ttfile.pas b/components/lazutils/ttfile.pas
index db7af6f1ad..e32993e94d 100644
--- a/components/lazutils/ttfile.pas
+++ b/components/lazutils/ttfile.pas
@@ -802,7 +802,7 @@ end;
    result := SeekFile(Position+ADist);
  end;
 
- function TFreeTypeStream.ReadFile(var ABuff; A Count: Int): TError;
+ function TFreeTypeStream.ReadFile(var ABuff; ACount: Int): TError;
  begin
    result := Failure;
    if FStream = nil then