unit u_corrections;

{$mode ObjFPC}{$H+}

// We expect the Position Measurement System  to suffer
// from some pillow-shaped distortion.
// This form is designed to enter corretion parameters.
// Correction algorithms are t.b.d.

interface

uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls;

type

  { TFrmCorrections }

  TFrmCorrections = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    TbxCorrectOffset_NS: TEdit;
    TbxCorrectOffset_EW: TEdit;
    TbxCorrectQuadratic_NS: TEdit;
    TbxCorrectQuadratic_EW: TEdit;
    TbxCorrectRotation_NS: TEdit;
    TbxCorrectRotation_EW: TEdit;
  private

  public

  end;

var
  FrmCorrections: TFrmCorrections;

implementation

{$R *.lfm}

end.

