Acana_Interiorismo/FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Unades faltantes

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@211 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
roberto 2008-04-24 09:57:51 +00:00
parent f57c426653
commit f4ddb83680
4 changed files with 289 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

116
Source/Modulos/Recibos de cliente/Views/uViewClienteRecibo.dfm Normal file
View File

@ -0,0 +1,116 @@
inherited frViewClienteRecibo: TfrViewClienteRecibo
Width = 357
Height = 318
ExplicitWidth = 357
ExplicitHeight = 318
inherited dxLayoutControl1: TdxLayoutControl
Width = 357
Height = 318
object Bevel1: TBevel [0]
Left = 81
Top = 71
Width = 266
Height = 13
Shape = bsBottomLine
end
inherited edtlNombre: TcxDBTextEdit
Left = 81
Top = 94
TabOrder = 3
ExplicitLeft = 81
ExplicitTop = 94
ExplicitWidth = 224
Width = 224
end
inherited edtNIFCIF: TcxDBTextEdit
Left = 81
Top = 121
TabOrder = 4
ExplicitLeft = 81
ExplicitTop = 121
ExplicitWidth = 562
Width = 562
end
inherited edtCalle: TcxDBTextEdit
Left = 81
Top = 148
TabOrder = 5
ExplicitLeft = 81
ExplicitTop = 148
ExplicitWidth = 562
Width = 562
end
inherited edtPoblacion: TcxDBTextEdit
Left = 81
Top = 175
TabOrder = 6
ExplicitLeft = 81
ExplicitTop = 175
ExplicitWidth = 177
Width = 177
end
inherited edtProvincia: TcxDBTextEdit
Left = 81
Top = 202
TabOrder = 8
ExplicitLeft = 81
ExplicitTop = 202
ExplicitWidth = 327
Width = 327
end
inherited edtCodigoPostal: TcxDBTextEdit
Left = 265
Top = 175
TabOrder = 7
ExplicitLeft = 265
ExplicitTop = 175
end
inherited Button3: TBitBtn
Left = 155
Top = 229
TabOrder = 9
ExplicitLeft = 155
ExplicitTop = 229
end
object cxDBTextEdit1: TcxDBTextEdit [10]
Left = 81
Top = 41
Anchors = [akLeft, akTop, akRight]
AutoSize = False
DataBinding.DataField = 'NOMBRE'
DataBinding.DataSource = DADataSource
Enabled = False
ParentFont = False
Properties.ReadOnly = True
Properties.UseLeftAlignmentOnEditing = False
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 2
Height = 21
Width = 283
end
inherited dxLayoutControl1Group_Root: TdxLayoutGroup
object dxLayoutControl1Item10: TdxLayoutItem [1]
Caption = 'Nombre:'
Control = cxDBTextEdit1
ControlOptions.ShowBorder = False
end
object dxLayoutControl1Item11: TdxLayoutItem [2]
Caption = 'Datos fiscales'
Offsets.Bottom = 3
Offsets.Top = 3
Control = Bevel1
ControlOptions.ShowBorder = False
end
inherited dxLayoutControl1Item1: TdxLayoutItem
Caption = 'Raz'#243'n:'
end
end
end
end

30
Source/Modulos/Recibos de cliente/Views/uViewClienteRecibo.pas Normal file
View File

@ -0,0 +1,30 @@
unit uViewClienteRecibo;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, uViewDatosYSeleccionCliente, ImgList, PngImageList, ActnList, DB,
uDAInterfaces, uDADataTable, dxLayoutControl, StdCtrls, Buttons, cxContainer,
cxEdit, cxTextEdit, cxDBEdit, cxControls, ExtCtrls;
type
TfrViewClienteRecibo = class(TfrViewDatosYSeleccionCliente)
dxLayoutControl1Item10: TdxLayoutItem;
cxDBTextEdit1: TcxDBTextEdit;
Bevel1: TBevel;
dxLayoutControl1Item11: TdxLayoutItem;
private
{ Private declarations }
public
{ Public declarations }
end;
var
frViewClienteRecibo: TfrViewClienteRecibo;
implementation
{$R *.dfm}
end.

113
Source/Modulos/Recibos de proveedor/Views/uViewProveedorRecibo.dfm Normal file
View File

@ -0,0 +1,113 @@
inherited frViewProveedorRecibo: TfrViewProveedorRecibo
Width = 357
Height = 318
ExplicitWidth = 357
ExplicitHeight = 318
inherited dxLayoutControl1: TdxLayoutControl
Width = 357
Height = 318
ExplicitWidth = 357
ExplicitHeight = 318
DesignSize = (
357
318)
object Bevel1: TBevel [0]
Left = 81
Top = 71
Width = 266
Height = 13
Shape = bsBottomLine
end
inherited edtlNombre: TcxDBTextEdit
Left = 81
Top = 94
TabOrder = 3
ExplicitLeft = 81
ExplicitTop = 94
ExplicitWidth = 224
Width = 224
end
inherited edtNIFCIF: TcxDBTextEdit
Left = 81
Top = 121
TabOrder = 4
ExplicitLeft = 81
ExplicitTop = 121
end
inherited edtCalle: TcxDBTextEdit
Left = 81
Top = 148
TabOrder = 5
ExplicitLeft = 81
ExplicitTop = 148
end
inherited edtPoblacion: TcxDBTextEdit
Left = 81
Top = 175
TabOrder = 6
ExplicitLeft = 81
ExplicitTop = 175
end
inherited edtProvincia: TcxDBTextEdit
Left = 81
Top = 202
TabOrder = 8
ExplicitLeft = 81
ExplicitTop = 202
end
inherited edtCodigoPostal: TcxDBTextEdit
Left = 265
Top = 175
TabOrder = 7
ExplicitLeft = 265
ExplicitTop = 175
end
inherited Button3: TBitBtn
Left = 149
Top = 229
TabOrder = 9
ExplicitLeft = 149
ExplicitTop = 229
end
object cxDBTextEdit1: TcxDBTextEdit [10]
Left = 81
Top = 41
Anchors = [akLeft, akTop, akRight]
AutoSize = False
DataBinding.DataField = 'NOMBRE'
DataBinding.DataSource = DADataSource
Enabled = False
ParentFont = False
Properties.ReadOnly = True
Properties.UseLeftAlignmentOnEditing = False
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 2
Height = 21
Width = 283
end
inherited dxLayoutControl1Group_Root: TdxLayoutGroup
object dxLayoutControl1Item10: TdxLayoutItem [1]
Caption = 'Nombre:'
Control = cxDBTextEdit1
ControlOptions.ShowBorder = False
end
object dxLayoutControl1Item11: TdxLayoutItem [2]
Caption = 'Datos fiscales'
Offsets.Bottom = 3
Offsets.Top = 3
Control = Bevel1
ControlOptions.ShowBorder = False
end
inherited dxLayoutControl1Item1: TdxLayoutItem
Caption = 'Raz'#243'n:'
end
end
end
end

30
Source/Modulos/Recibos de proveedor/Views/uViewProveedorRecibo.pas Normal file
View File

@ -0,0 +1,30 @@
unit uViewProveedorRecibo;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, uViewDatosYSeleccionProveedor, ImgList, PngImageList, ActnList, DB,
uDAInterfaces, uDADataTable, dxLayoutControl, StdCtrls, Buttons, cxContainer,
cxEdit, cxTextEdit, cxDBEdit, cxControls, ExtCtrls;
type
TfrViewProveedorRecibo = class(TfrViewDatosYSeleccionProveedor)
dxLayoutControl1Item10: TdxLayoutItem;
cxDBTextEdit1: TcxDBTextEdit;
Bevel1: TBevel;
dxLayoutControl1Item11: TdxLayoutItem;
private
{ Private declarations }
public
{ Public declarations }
end;
var
frViewProveedorRecibo: TfrViewProveedorRecibo;
implementation
{$R *.dfm}
end.