浏览代码

* string -> shortstring

Michael VAN CANNEYT 2 年之前
父节点
当前提交
a4ebdb4eee
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      rtl/qnx/dos.inc

+ 2 - 2
rtl/qnx/dos.inc

@@ -117,9 +117,9 @@ End;
 
 
 { QNX stores its timezone information, in POSIX format }
 { QNX stores its timezone information, in POSIX format }
 { in the /etc/TIMEZONE file.                           }
 { in the /etc/TIMEZONE file.                           }
-function GetTimezoneString: string;
+function GetTimezoneString: shortstring;
 var
 var
- s: string;
+ s: shortstring;
  T: text;
  T: text;
 begin
 begin
  GetTimeZoneString:=''; 
  GetTimeZoneString:='';