Unit 'RLFeedBack' Package
[Overview][Classes][Variables][Index] [#pl_fortesreport]

TfrmRLFeedBack

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: rlfeedback.pas line 51

type TfrmRLFeedBack = class(TForm)

  BitBtnCancel: TBitBtn;

  

  LabelPhase: TLabel;

  

  LabelStepName: TLabel;

  

  ProgressBar1: TProgressBar;

  

  TimerBlink: TTimer;

  

  procedure BitBtnCancelClick();

  

  procedure FormDestroy();

  

  procedure TimerBlinkTimer();

  

public

  Canceled: Boolean;

  

  Finished: Boolean;

  

  constructor CreateEX();

  

  procedure SetUp();

  

  procedure SetMax();

  

  procedure StepIt;

  

  procedure SetPhase();

  

  procedure NextBar;

  

  procedure Finish;

  

end;

Inheritance

TfrmRLFeedBack

  

|

TObject



CT Web help

CodeTyphon Studio