LongWord(pc^) := $3D3D3D3D; typecast delphi 2009 win32

[JXJ]

asi es.. ..

por que se usa

Código Delphi [-]
var
//  Base64Map: array [0..63] of Char = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/';
  Base64Map: array [0..63] of AnsiChar = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/';

y es un array de char.
al se rusado por bin to char

Código Delphi [-]
//function CharTo6Bit(c: Char): Byte;
function CharTo6Bit(c: AnsiChar): Byte;
begin
  if (c >= 'A') and (c <= 'Z') then
    Result := Ord(c) - Ord('A')
  else if (c >= 'a') and (c <= 'z') then
    Result := Ord(c) - Ord('a') + 26
  else if (c >= '0') and (c <= '9') then
    Result := Ord(c) - Ord('0') + 52
  else if c = '+' then
    Result := 62
  else if c = '/' then
    Result := 63
  else
    Result := 0
end;

asi compila e instala. pero
la funcionalidad de usar highlighters con la funcionalidad agregada de
codefolding, y el resaltado de varios lenguajes de programacion.

no se logra por que esta basada en archivos XML
y estos los lee basado en char. y byte

entonces a esperar a que el chino lo actualize de delphi 2009.

por que me gusta por que es casi el la misma funcionalidad del ide delphi 2009
ademas de el codefolding que no es como del ide delphi 2006 y en adelante
sino que esta marcado con una barrita que no corre por completo en el gutter
sino por secciones. eso ayuda mucho a distinguir donde termina
un procedure, funcion.


y ademas. por que tiene la barrita qeu cambia de color con el estado de edicion de la linea