roberto
8679a9bc04
git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@2 93f398dd-4eb6-7a46-baf6-13f46f578da2
31 lines
794 B
ObjectPascal
31 lines
794 B
ObjectPascal
unit uIEditorElegirDireccionEntrega;
|
|
|
|
interface
|
|
|
|
uses
|
|
uBizContactos, uBizDireccionesContacto, uGUIBase;
|
|
|
|
type
|
|
IEditorElegirDireccionEntrega = interface
|
|
['{A0F4DE3A-8FC6-43EC-A021-2FD7CB2A9D1B}']
|
|
function GetContacto: IBizContacto;
|
|
procedure SetContacto(const Value: IBizContacto);
|
|
property Contacto : IBizContacto read GetContacto write SetContacto;
|
|
|
|
procedure SetMensaje (const AValue: String);
|
|
function GetMensaje: String;
|
|
property Mensaje : String read GetMensaje write SetMensaje;
|
|
|
|
function GetDireccionSeleccionada: IBizDireccionesContacto;
|
|
property DireccionSeleccionada: IBizDireccionesContacto read GetDireccionSeleccionada;
|
|
|
|
function ShowModal : Integer;
|
|
procedure Release;
|
|
end;
|
|
|
|
|
|
implementation
|
|
|
|
end.
|
|
|