37 lines
847 B
ObjectPascal
37 lines
847 B
ObjectPascal
|
unit uViewTotales;
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||
|
|
Dialogs, uViewBase, ExtCtrls, StdCtrls, DB, uDADataTable, cxGraphics,
|
||
|
|
cxTextEdit, cxMaskEdit, cxDropDownEdit, cxDBEdit, cxControls,
|
||
|
|
cxContainer, cxEdit, cxLabel, cxDBLabel, cxCurrencyEdit, cxSpinEdit,
|
||
|
|
ComCtrls;
|
||
|
|
|
||
|
|
type
|
||
|
|
TfrViewTotales = class(TfrViewBase)
|
||
|
|
DADataSource: TDADataSource;
|
||
|
|
GroupBox1: TGroupBox;
|
||
|
|
Label1: TLabel;
|
||
|
|
Label3: TLabel;
|
||
|
|
Label5: TLabel;
|
||
|
|
Label7: TLabel;
|
||
|
|
lblBase: TcxDBCurrencyEdit;
|
||
|
|
cxCurrencyEdit4: TcxDBCurrencyEdit;
|
||
|
|
cxCurrencyEdit5: TcxDBCurrencyEdit;
|
||
|
|
cxCurrencyEdit2: TcxDBSpinEdit;
|
||
|
|
TabControl1: TTabControl;
|
||
|
|
private
|
||
|
|
{ Private declarations }
|
||
|
|
public
|
||
|
|
{ Public declarations }
|
||
|
|
end;
|
||
|
|
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
{$R *.dfm}
|
||
|
|
|
||
|
|
end.
|