Class TInputWavelengthDlg

Unit

input_wavelength_dialog

Declaration

type TInputWavelengthDlg = class(TForm)

Description

TInputWavelengthDlg

Hierarchy

• TForm
• TInputWavelengthDlg

Overview

Fields

	Bevel1: TBevel;
	CancelBtn: TButton;
	FValue: double;
	Label1: TLabel;
	OKBtn: TButton;
	WavelengthValueEdit: TEdit;

Methods

	procedure FormActivate(Sender: TObject);
	procedure FormCloseQuery(Sender: TObject; var CanClose: boolean);

Description

Fields

	Bevel1: TBevel;

	CancelBtn: TButton;

	FValue: double;

	Label1: TLabel;

	OKBtn: TButton;

	WavelengthValueEdit: TEdit;

Methods

	procedure FormActivate(Sender: TObject);

	procedure FormCloseQuery(Sender: TObject; var CanClose: boolean);