Class

TfrmActivateDeactive

Module

fActivateDeactivate

Last Modified

7/15/2014 3:26:36 PM

Scope

Interfaced

Inherits from

TfrmAutoSz

Declaration


TfrmActivateDeactive = class(TfrmAutoSz)
  TActivate: TButton;
  TDeactive: TButton;
  Memo1: TMemo;
  TCancel: TButton;
  procedure TActivateClick(Sender: TObject);
  procedure TDeactiveClick(Sender: TObject);
  procedure TCancelClick(Sender: TObject);
private
  { Private declarations }
  procedure GetOriginalOrders(OrderID: TStringList; var OriginalOrder: TORStringList);
  procedure DCOriginalOrder(OrderID: string);
  procedure BuildForm(Str1: String);
  function PromptForm(Text: String): String;
public
   { Public declarations }

  procedure fActivateDeactive(OrderID: TStringList); overload;
  procedure fActivateDeactive(OrderID: TStringList; AList: TListBox); overload;
end;

DFM Objects


frmActivateDeactive : TfrmActivateDeactive
 ├TActivate : TButton
 ├TDeactive : TButton
 ├Memo1 : TMemo
 ├TCancel : TButton
 └amgrMain : TVA508AccessibilityManager

Class Hierarchy


Class Fields

Name Type Scope Comments
Memo1 TMemo Public/Published -
TActivate TButton Public/Published -
TCancel TButton Public/Published -
TDeactive TButton Public/Published -

Methods

Name Declaration Scope Comments
BuildForm procedure BuildForm(Str1: String); Private TfrmActivateDeactive
DCOriginalOrder procedure DCOriginalOrder(OrderID: string); Private -
fActivateDeactive procedure fActivateDeactive(OrderID: TStringList; AList: TListBox); overload; Public -
fActivateDeactive procedure fActivateDeactive(OrderID: TStringList); overload; Public Public declarations
GetOriginalOrders procedure GetOriginalOrders(OrderID: TStringList; var OriginalOrder: TORStringList); Private Private declarations
PromptForm function PromptForm(Text: String): String; Private -
TActivateClick procedure TActivateClick(Sender: TObject); Public/Published -
TCancelClick procedure TCancelClick(Sender: TObject); Public/Published -
TDeactiveClick procedure TDeactiveClick(Sender: TObject); Public/Published -

Referenced By (2)

Module (line) Referrer Type
fActivateDeactivate (33) frmActivateDeactive Read
fActivateDeactivate (132) - Read