Ver Mensaje Individual
  #1  
Antiguo 22-03-2016
xangiesaurx xangiesaurx is offline
Miembro
NULL
 
Registrado: feb 2016
Posts: 57
Reputación: 9
xangiesaurx Va por buen camino
error overload

Hola a todos, de nuevo vengo a molestarlos, aun sigo migrando proyectos de Delphi 2010 a XE, el problema que tengo ahora es que tengo el siguiente código:

Código Delphi [-]
//// Fills memory with DWord value
procedure FillDWord(V: DWord; Dest: Pointer; Count: Integer); overload;

procedure FillDWord(V: DWord; Dest: Pointer; Count: Integer); overload;
{
  EAX = V
  EDX = Dest
  ECX = Count
}
asm
  shr   ecx, 1
  jnc   @1
  mov   [edx],eax
  add   edx,4
@1:
  shr   ecx, 1
  jnc   @2
  mov   [edx],eax
  mov   [edx+4],eax
  add   edx,2*4
@2:
  jcxz  @Exit
@3:
  mov   [edx    ],eax
  mov   [edx+1*4],eax
  mov   [edx+2*4],eax
  mov   [edx+3*4],eax
  add   edx,4*4
  loop  @3
@Exit:
end;

y me esta dando estos errores:

[dcc32 Error] GraphicUtils.pas(229): E2254 Overloaded procedure 'FillDWord’ must be marked with the 'overload’ directive
[dcc32 Error] GraphicUtils.pas(58): E2065 Unsatisfied forward or external declaration: 'FillDWord’

El primer error desaparece cuando marco los dos como overload (así como esta en el código que puse) y es cuando aparece el segundo error, lo logro quitar si comento la declaración, pero ahí esta otro problema por que también los usan externamente.

Alguien sabe que podría hacer para solucionar esto?
Responder Con Cita