Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 06-05-2016
blaiselaborde blaiselaborde is offline
Miembro
 
Registrado: nov 2006
Ubicación: Reino Unido
Posts: 40
Poder: 0
blaiselaborde Va por buen camino
Directories and Conditionals

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;//, Main;
{$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; // Proc
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 11:40:20.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi