64 lines
1.3 KiB
ObjectPascal
64 lines
1.3 KiB
ObjectPascal
unit frmRamcovyPlan;
|
|
|
|
interface
|
|
|
|
uses
|
|
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
|
|
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, Vcl.StdCtrls, RzCmboBx, Vcl.Buttons, Data.DB,
|
|
Vcl.Grids, Vcl.DBGrids, JvExDBGrids, JvDBGrid, ddPlugin_TLB;
|
|
|
|
type
|
|
TformRamcovyPlan = class(TForm)
|
|
GridPanel1: TGridPanel;
|
|
GridPanel2: TGridPanel;
|
|
GridPanel3: TGridPanel;
|
|
Label1: TLabel;
|
|
cbAkce: TRzComboBox;
|
|
GridPanel4: TGridPanel;
|
|
Label2: TLabel;
|
|
cbSezona: TRzComboBox;
|
|
GridPanel5: TGridPanel;
|
|
Label3: TLabel;
|
|
BitBtn1: TBitBtn;
|
|
grdAlternativy: TJvDBGrid;
|
|
JvDBGrid1: TJvDBGrid;
|
|
edtKalibr: TEdit;
|
|
edtDelkaJm: TEdit;
|
|
edtStroj: TEdit;
|
|
Label4: TLabel;
|
|
GridPanel6: TGridPanel;
|
|
edtSK: TEdit;
|
|
edtRegCis: TEdit;
|
|
edtNazev1: TEdit;
|
|
edtMJ: TEdit;
|
|
edtKs: TEdit;
|
|
edtKA: TEdit;
|
|
edtOdber: TEdit;
|
|
edtM01: TEdit;
|
|
edtM02: TEdit;
|
|
edtM03: TEdit;
|
|
edtM04: TEdit;
|
|
edtM05: TEdit;
|
|
edtM06: TEdit;
|
|
edtM07: TEdit;
|
|
edtM08: TEdit;
|
|
edtM09: TEdit;
|
|
edtM10: TEdit;
|
|
edtM11: TEdit;
|
|
edtM12: TEdit;
|
|
private
|
|
public
|
|
Helios: IHelios;
|
|
end;
|
|
|
|
var
|
|
formRamcovyPlan: TformRamcovyPlan;
|
|
|
|
implementation
|
|
uses System.StrUtils,
|
|
datMod2, helUtils;
|
|
|
|
{$R *.dfm}
|
|
|
|
end.
|