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

uViewDetallesGenerico: faltaba la declaración del interfaz IViewDetallesGenerico.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@143 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2008-02-24 16:03:13 +00:00
parent 0d1359c606
commit 62a906bbb8
3 changed files with 11 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
Source/GUIBase/GUIBase.res
View File

Binary file not shown.

12
Source/GUIBase/uViewDetallesGenerico.dfm
View File

@ -73,19 +73,19 @@ inherited frViewDetallesGenerico: TfrViewDetallesGenerico
Transparent = True Transparent = True
object ToolButton1: TToolButton object ToolButton1: TToolButton
Left = 0 Left = 0
Top = 2 Top = 0
Action = actAnadir Action = actAnadir
AutoSize = True AutoSize = True
end end
object ToolButton4: TToolButton object ToolButton4: TToolButton
Left = 62 Left = 62
Top = 2 Top = 0
Action = actModificar Action = actModificar
AutoSize = True AutoSize = True
end end
object ToolButton5: TToolButton object ToolButton5: TToolButton
Left = 136 Left = 136
Top = 2 Top = 0
Width = 8 Width = 8
Caption = 'ToolButton5' Caption = 'ToolButton5'
ImageIndex = 2 ImageIndex = 2
@ -93,13 +93,13 @@ inherited frViewDetallesGenerico: TfrViewDetallesGenerico
end end
object ToolButton2: TToolButton object ToolButton2: TToolButton
Left = 144 Left = 144
Top = 2 Top = 0
Action = actEliminar Action = actEliminar
AutoSize = True AutoSize = True
end end
object ToolButton6: TToolButton object ToolButton6: TToolButton
Left = 211 Left = 211
Top = 2 Top = 0
Width = 8 Width = 8
Caption = 'ToolButton6' Caption = 'ToolButton6'
ImageIndex = 2 ImageIndex = 2
@ -107,7 +107,7 @@ inherited frViewDetallesGenerico: TfrViewDetallesGenerico
end end
object ToolButton7: TToolButton object ToolButton7: TToolButton
Left = 219 Left = 219
Top = 2 Top = 0
Action = actAnchoAutomatico Action = actAnchoAutomatico
AutoSize = True AutoSize = True
end end

6
Source/GUIBase/uViewDetallesGenerico.pas
View File

@ -11,7 +11,11 @@ uses
cxControls, cxGridCustomView, cxGrid, uDAInterfaces; cxControls, cxGridCustomView, cxGrid, uDAInterfaces;
type type
TfrViewDetallesGenerico = class(TfrViewBase) IViewDetallesGenerico = interface(IViewBase)
['{CA4BD183-1DCD-453D-A1A2-A3B7349BBE40}']
end;
TfrViewDetallesGenerico = class(TfrViewBase, IViewDetallesGenerico)
cxGrid: TcxGrid; cxGrid: TcxGrid;
cxGridView: TcxGridDBTableView; cxGridView: TcxGridDBTableView;
cxGridViewID: TcxGridDBColumn; cxGridViewID: TcxGridDBColumn;