Buenos días;
Tengo una Unidad de Delphi que se utiliza en dos aplicaciones diferentes. El problema está en que hay uns instrucción que llama a un Método de otra Unidad sólo para una aplicación, en la otra, no se necesita y por tanto, genera un error de compilación. Tengo entendido que puedo controlar estos textos con las Directivas de Compilación, sin embargo, no puedo definir con $DEFINE en la misma Unidad, porque se comparte para ambas aplicaciones.
Estuve leyendo el Hilo:
http://www.clubdelphi.com/foros/showthread.php?t=76880 pero estoy utilizando Delphi XE7 y no me coincide lo que hago con la solución que se propone.
Alguien me puede dar una mano? . . . .
Muchas gracias.
Código Delphi
[-]
{$IFDEF NOTMAIN}
Uses DMJBS, DMImages, OneWayAppointment, LoginUnit, Common, DataModule, Data, RequestData;{$ELSE}
Uses DMJBS, DMImages, OneWayAppointment, LoginUnit, Common, DataModule, Data, RequestData, Main;
{$ENDIF}
. . .
Código Delphi
[-]
Procedure TForm.acViewAccountExecute(Sender: TObject);
Begin
Inherited;
{$IFDEF NOTMAIN}
{$ELSE}
If Not dsOutboundList.DataSet.IsEmpty then
Begin
FRM_Main.SearchforCust(dbgResults.Cells[4, dbgResults.Row]);
pRefresh;
End;
{$ENDIF}
End;