19 lines
388 B
ObjectPascal
19 lines
388 B
ObjectPascal
|
unit uIViewFiltroClientes;
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
uIViewParametrosInforme;
|
||
|
|
|
||
|
|
type
|
||
|
|
IViewFiltroClientes = interface(IViewParametrosInforme)
|
||
|
|
['{129906DA-8E64-4312-8095-A04F8007CF7F}']
|
||
|
|
procedure setIdCliente(const IdCliente:Integer);
|
||
|
|
function getIdCliente: Integer;
|
||
|
|
property IdCliente : Integer read getIdCliente write setIdCliente;
|
||
|
|
end;
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
end.
|