Changeset 1679 for cprs/trunk/CPRS-Chart/Orders/fOMNavA.pas

Timestamp:

May 7, 2015, 12:34:29 PM (9 years ago)

Author:

healthsevak

Message:

Updating the working copy to CPRS version 28

File:

• cprs/trunk/CPRS-Chart/Orders/fOMNavA.pas (modified) (1 diff)

cprs/trunk/CPRS-Chart/Orders/fOMNavA.pas

@@ -647 +647 @@
   if grdMenu.Objects[grdMenu.Col, grdMenu.Row] is TOrderMenuItem then begin
     OrderMenuItem := TOrderMenuItem(grdMenu.Objects[grdMenu.Col, grdMenu.Row]);
+    Text := OrderMenuItem.Mnemonic + ', ' + OrderMenuItem.ItemText;
     if OrderMenuItem.AutoAck then
-      Text := 'Auto Accept, '+ OrderMenuItem.ItemText;
+      Text := 'Auto Accept, '+ Text;
   end;
 end;