소스 검색

TSearchRec.GetTimeStamp: fix ifdefs

git-svn-id: trunk@47395 -
ondrej 4 년 전
부모
커밋
33fe3f3ede
1개의 변경된 파일6개의 추가작업 그리고 12개의 파일을 삭제
  1. 6 12
      rtl/objpas/sysutils/filutil.inc

+ 6 - 12
rtl/objpas/sysutils/filutil.inc

@@ -687,18 +687,16 @@ function TUnicodeSearchRec.GetTimeStamp: TDateTime;
 begin
 {$if declared(FindDataTimeToDateTime)}
   if not FindDataTimeToDateTime(FindData.ftLastWriteTime, Result) then
-{$else}
-  Result := FileDateToDateTime(Time);
 {$endif}
+    Result := FileDateToDateTime(Time);
 end;
 
 function TUnicodeSearchRec.GetTimeStampUTC: TDateTime;
 begin
 {$if declared(FindDataTimeToUTC)}
   if not FindDataTimeToUTC(FindData.ftLastWriteTime, Result) then
-{$else}
-  Result := FileDateToUTC(Time);
 {$endif}
+    Result := FileDateToUTC(Time);
 end;
 
 { TRawbyteSearchRec }
@@ -707,18 +705,16 @@ function TRawbyteSearchRec.GetTimeStamp: TDateTime;
 begin
 {$if declared(FindDataTimeToDateTime)}
   if not FindDataTimeToDateTime(FindData.ftLastWriteTime, Result) then
-{$else}
-  Result := FileDateToDateTime(Time);
 {$endif}
+    Result := FileDateToDateTime(Time);
 end;
 
 function TRawbyteSearchRec.GetTimeStampUTC: TDateTime;
 begin
 {$if declared(FindDataTimeToDateTime)}
   if not FindDataTimeToUTC(FindData.ftLastWriteTime, Result) then
-{$else}
-  Result := FileDateToUTC(Time);
 {$endif}
+    Result := FileDateToUTC(Time);
 end;
 
 { TUnicodeSymLinkRec }
@@ -727,9 +723,8 @@ function TUnicodeSymLinkRec.GetTimeStamp: TDateTime;
 begin
 {$if declared(FindDataTimeToDateTime)}
   if not FindDataTimeToDateTime(FindData.ftLastWriteTime, Result) then
-{$else}
-  Result := 0;
 {$endif}
+    Result := 0;
 end;
 
 { TRawbyteSymLinkRec }
@@ -738,9 +733,8 @@ function TRawbyteSymLinkRec.GetTimeStamp: TDateTime;
 begin
 {$if declared(FindDataTimeToDateTime)}
   if not FindDataTimeToDateTime(FindData.ftLastWriteTime, Result) then
-{$else}
-  Result := 0;
 {$endif}
+    Result := 0;
 end;