Changeset 1695 for cprs/branches/HealthSevak-CPRS/VA/VAUtils.pas

Timestamp:

May 9, 2015, 7:15:46 AM (9 years ago)

Author:

healthsevak

Message:

updated these files for version 28

File:

• cprs/branches/HealthSevak-CPRS/VA/VAUtils.pas (modified) (2 diffs)

cprs/branches/HealthSevak-CPRS/VA/VAUtils.pas

@@ -1 +1 @@
 unit VAUtils;
-                       
+
 {TODO  -oJeremy Merrill -cMessageHandlers : Change component list to use hex address for uComponentList
 search instead of IndexOfObject, so that it used a binary search
@@ -19 +19 @@
 function ShowMsg(const Msg, Caption: string; Icon: TShow508MessageIcon = smiNone;
                     Buttons: TShow508MessageButton = smbOK): TShow508MessageResult; overload;
-function Show508Message(const Msg: string): TShow508MessageResult;
+
+function Show508Message(Const Msg: String): TShow508MessageResult;
 function ShowMsg(const Msg: string; Icon: TShow508MessageIcon = smiNone;
                     Buttons: TShow508MessageButton = smbOK): TShow508MessageResult; overload;