git-svn-id: https://192.168.0.254/svn/Proyectos.AlonsoYSal_FactuGES/trunk@5 9a1d36f3-7752-2d40-8ccb-50eb49674c68
41 lines
862 B
ObjectPascal
41 lines
862 B
ObjectPascal
unit uViewDireccion;
|
|
|
|
interface
|
|
|
|
uses
|
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
|
Dialogs, uViewBase, StdCtrls, Mask, DBCtrls, DB, uDADataTable, ExtCtrls,
|
|
JvComponent, JvFormAutoSize, cxControls, cxContainer, cxEdit, cxTextEdit,
|
|
cxDBEdit;
|
|
|
|
type
|
|
TfrViewDireccion = class(TfrViewBase)
|
|
Bevel1: TBevel;
|
|
DADataSource: TDADataSource;
|
|
Label5: TLabel;
|
|
lblCalle: TLabel;
|
|
lblCodigoPostal: TLabel;
|
|
lblPoblacion: TLabel;
|
|
lblProvincia: TLabel;
|
|
eCalle: TcxDBTextEdit;
|
|
ePoblacion: TcxDBTextEdit;
|
|
eProvincia: TcxDBTextEdit;
|
|
eCodigoPostal: TcxDBTextEdit;
|
|
protected
|
|
end;
|
|
|
|
var
|
|
frViewDireccion: TfrViewDireccion;
|
|
|
|
implementation
|
|
|
|
{$R *.dfm}
|
|
|
|
initialization
|
|
RegisterClass(TfrViewDireccion);
|
|
|
|
finalization
|
|
UnRegisterClass(TfrViewDireccion);
|
|
|
|
end.
|