unit uStatement;

interface

type
  TStatement = class(TObject)
  private
    fName: string;
    fSQL: string;
    fDescription: string;
  public
    constructor Create(const aName, aSQL, aDescription: string);
    property Name: string read fName;
    property SQL: string read fSQL;
    property Description: string read fDescription;
  end;

implementation

{ TStatement }

constructor TStatement.Create(const aName, aSQL, aDescription: string);
begin
  inherited Create;
  fName := aName;
  fSQL := aSQL;
  fDescription := aDescription;
end;

end.