diff --git a/Quick.Collections.pas b/Quick.Collections.pas
index 5757ad9..f7942a4 100644
--- a/Quick.Collections.pas
+++ b/Quick.Collections.pas
@@ -296,7 +296,7 @@ function TxList<T>.ExtractItem(const Value: T; Direction: TDirection): T;
 
 function TxList<T>.First: T;
 begin
-  Result := fList.First;
+  if fList.Count > 0 then Result := fList.First;
 end;
 
 procedure TxList<T>.FromList(const aList: TList<T>);
@@ -377,7 +377,7 @@ procedure TxList<T>.InsertRange(Index: Integer; const Values: array of T);
 
 function TxList<T>.Last: T;
 begin
-  Result := fList.Last;
+  if fList.Count > 0 then Result := fList.Last;
 end;
 
 function TxList<T>.LastIndexOf(const Value: T): Integer;