diff --git a/README.md b/README.md
index 6fbb6b4..79aac7f 100644
--- a/README.md
+++ b/README.md
@@ -75,7 +75,7 @@ begin
       WriteLn('-------------------------');
 
       if SMBios.HasPhysicalMemoryArrayInfo then
-      for LMemoryDevice in SMBios.MemoryDeviceInformation do
+      for LMemoryDevice in SMBios.MemoryDeviceInfo do
       begin
         WriteLn(Format('Total Width    %d bits',[LMemoryDevice.RAWMemoryDeviceInfo.TotalWidth]));
         WriteLn(Format('Data Width     %d bits',[LMemoryDevice.RAWMemoryDeviceInfo.DataWidth]));