Ver Mensaje Individual
  #7  
Antiguo 02-02-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
Bueno Ñuño, le he echado un vistazo a tu librería. Y se me han presentando un par de problemillas al intentar compilarlos en mi Turbo Delphi. Aquí te dejo una lista con algunos problemas y las soluciones que modestamente utilice, aunque puede que tu encuentres una forma mejor de hacerlo.

Código:
[Pascal Error] albase.pas(56): E2003 Undeclared identifier: 'DWORD'
--> Añadí la unit Windows

[Pascal Error] alfixed.pas(216): E2016 Array type required
--> Anadi la siguiente funcion
  function tabla(Base: TBLptr; Offset: Integer): AL_FIXED;
  begin
    inc(Base,Offset);
    Result:= Base^;
  end; 
  
  Y corregí el problema de la siguiente manera:
  al_fixsin := tabla(_cos_tbl,((x - $400000 + $4000) SHR 15) AND $1FF);

  Este problema se repite en varias lineas mas, utilice la misma solución

Incompatible types: 'AL_CHARptr' and 'PAnsiChar'
--> Este error aparece varias veces, un simple Typecast soluciona el problema.

Incompatible types: 'AL_CHARptr' and 'string'  
--> Este error aparece varias veces, un simple Typecast soluciona el problema.
Por cierto el ejemplo expal me gusto, es casi hipnótico
Responder Con Cita