Procedure

TfrmOrdersTS.FormKeyDown

Module

fOrdersTS

Last Modified

7/15/2014 3:26:42 PM

Visibility

Public/Published

Owner

TfrmOrdersTS

Declaration

procedure FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);

Calls Hierarchy


TfrmOrdersTS.FormKeyDown
 └TfrmOrdersTS.cmdOKClick
   └TfraEvntDelayList.CheckMatch
     ├isMatchedEvent
     └TfrmOrders.lstSheetsClick
       ├CloseOrdering
       ├TfrmOrders.PtEvtCompleted
       │ ├IsCompletedPtEvt
       │ ├TfrmOrders.GroupChangesUpdate
       │ │ ├TChanges.ChangeOrderGrp
       │ │ └TChanges.ReplaceODGrpName
       │ ├TfrmOrders.InitOrderSheetsForEvtDelay
       │ │ ├TfrmOrders.InitOrderSheets
       │ │ │ ├TfrmOrders.ClearOrderSheets
       │ │ │ ├LoadOrderSheetsED
       │ │ │ ├DGroupAll
       │ │ │ └EventInfo
       │ │ └TfrmOrders.DfltViewForEvtDelay
       │ │   ├TfrmOrders.CanChangeOrderView
       │ │   │ └ActiveOrdering
       │ │   └LoadOrderViewDefault
       │ ├TfrmOrders.lstSheetsClick...
       │ └TfrmOrders.RefreshOrderList
       │   ├LoadOrdersAbbr
       │   │ ├ClearOrders
       │   │ ├LoadDGroupMap
       │   │ ├ExpiredOrdersStartDT
       │   │ ├FMNow
       │   │ └SeqOfDGroup
       │   │   └LoadDGroupMap
       │   ├ClearOrders
       │   ├LoadOrdersAbbr
       │   │ ├LoadDGroupMap
       │   │ ├FMNow
       │   │ └SeqOfDGroup...
       │   ├TfrmOrders.ExpandEventSection
       │   ├TfrmOrders.CompressEventSection
       │   ├SortOrders
       │   │ ├InverseByGroup
       │   │ │ └TChanges.Exist
       │   │ ├ForwardByGroup
       │   │ │ └TChanges.Exist
       │   │ ├InverseChrono
       │   │ └ForwardChrono
       │   ├TfrmOrders.AddToListBox
       │   │ └TfrmOrders.GetPlainText
       │   │   └TfrmOrders.GetOrderText
       │   │     ├LoadFlagReason
       │   │     ├TfrmOrders.GetStartStopText
       │   │     └NameOfStatus
       │   └DGroupAll
       ├DeleteEmptyEvt
       │ ├PtEvtEmpty
       │ ├GetEventName
       │ └DeletePtEvent
       ├TfrmOrders.ChangesUpdate
       │ ├TheParentPtEvt
       │ └TChanges.Remove
       │   ├UnlockOrder
       │   └UnlockDocument
       ├TfrmOrders.InitOrderSheetsForEvtDelay...
       ├..(rec)..
       ├LoadWriteOrdersED
       ├LoadWriteOrders
       ├TfrmOrders.RefreshOrderList...
       ├PtEvtEmpty
       └DeletePtEvent

Calls

Name Declaration Comments
TfrmOrdersTS.cmdOKClick procedure cmdOKClick(Sender: TObject); -


Source

299   procedure TfrmOrdersTS.FormKeyDown(Sender: TObject; var Key: Word;
300     Shift: TShiftState);
301   begin
302     inherited;
303     if Key = VK_RETURN then
304        cmdOKClick(Self);
305   end;