Fixed bugs introduced in previous commit

Author: delphidabbler

Src/UUtils.pas

@@ -337,7 +337,7 @@ function ParseSQLDateTime(const SQLDateTime: string): TDateTime;
     raise EConvertError.CreateFmt(sBadDate, [SQLDateTime]);
 end;
 
-function TryParseSQLDateTime(const SQLDateStr: string; out Value: TDateTime):
+function TryParseSQLDateTime(const SQLDateTime: string; out Value: TDateTime):
   Boolean;
 var
   Year, Month, Day, Hour, Min, Sec: Word;
@@ -438,16 +438,6 @@ function TryStrToCardinal(const S: string; out Value: Cardinal): Boolean;
     Value := Int64Rec(Value64).Lo;
 end;
 
-function TryStrToWord(const S: string; out Value: Word): Boolean;
-var
-  ValueInt: Integer;
-begin
-  Result := TryStrToInt(S, ValueInt)
-    and (LongRec(ValueInt).Hi = 0);
-  if Result then
-    Value := LongRec(ValueInt).Lo;
-end;
-
 function IsEqualBytes(const BA1, BA2: TBytes; const Count: Cardinal):
   Boolean;
 var