如何编译通过 Raize 5.3 中的 RzBorder.pas
编译 Raize 5.3 ,遇到 RzBorder.pas 编译不能通过的问题。
原来是 Raize 的原编译环境对中文 (其实是 unicode )的支持不好所造成的,慢慢摸索中,发现
type
TRzLEDValidChars = Chr( 32 )..Chr( 255 );//' '..' ;
TRzLEDCharMask = record
Col0: Byte;
Col1: Byte;
Col2: Byte;
Col3: Byte;
Col4: Byte;
end;
TRzLEDCharacters = array[ TRzLEDValidChars ] of TRzLEDCharMask;
const
DotMasks: TRzLEDCharacters = ( ( { } Col0: $00; Col1: $00; Col2: $00; Col3: $00; Col4: $00 ),
( {!} Col0: $00; Col1: $00; Col2: $FA; Col3: $00; Col4: $00 ),
( {"} Col0: $00; Col1: $C0; Col2: $00; Col3: $C0; Col4: $00 ),
( {#} Col0: $28; Col1: $7C; Col2: $28; Col3: $7C; Col4: $28 ), ……………………
中的 第一行 TRzLEDValidChars = Chr( 32 )..Chr( 255 );//' '..' ;定义的数据对 unicode 字符的越界。
其实说实在的,一些特别的字符真的没什么用处,(不是胡说的,从3.x 后面的版本呢可以看出所以然)。
改。
多次摸索……………… 3个小时
改为如下:
type
TRzLEDValidChars = Chr( 32 )..Chr( 126 ); //
// TRzLEDValidChars = ' '..' ';
TRzLEDCharMask = record
Col0: Byte;
Col1: Byte;
Col2: Byte;
Col3: Byte;
Col4: Byte;
end;
TRzLEDCharacters = array[ TRzLEDValidChars ] of TRzLEDCharMask ;
const
DotMasks: TRzLEDCharacters = ( ( { } Col0: $00; Col1: $00; Col2: $00; Col3: $00; Col4: $00 ), //32
( {!} Col0: $00; Col1: $00; Col2: $FA; Col3: $00; Col4: $00 ),
( {"} Col0: $00; Col1: $C0; Col2: $00; Col3: $C0; Col4: $00 ),
( {#} Col0: $28; Col1: $7C; Col2: $28; Col3: $7C; Col4: $28 ), //35
( { } Col0: $24; Col1: $54; Col2: $FE; Col3: $54; Col4: $48 ), // Dollar sign $
( {%} Col0: $64; Col1: $68; Col2: $10; Col3: $2C; Col4: $4C ), //37
( {&} Col0: $6C; Col1: $92; Col2: $AA; Col3: $44; Col4: $0A ),
( {'} Col0: $00; Col1: $20; Col2: $C0; Col3: $00; Col4: $00 ),
( {(} Col0: $00; Col1: $00; Col2: $7C; Col3: $82; Col4: $00 ),
( {)} Col0: $00; Col1: $82; Col2: $7C; Col3: $00; Col4: $00 ),
( {*} Col0: $54; Col1: $38; Col2: $FE; Col3: $38; Col4: $54 ),
( {+} Col0: $10; Col1: $10; Col2: $7C; Col3: $10; Col4: $10 ),
( {,} Col0: $00; Col1: $02; Col2: $04; Col3: $00; Col4: $00 ),
( {-} Col0: $10; Col1: $10; Col2: $10; Col3: $10; Col4: $10 ),
( {.} Col0: $00; Col1: $00; Col2: $02; Col3: $00; Col4: $00 ),
( {/} Col0: $04; Col1: $08; Col2: $10; Col3: $20; Col4: $40 ),
( {0} Col0: $7C; Col1: $8A; Col2: $92; Col3: $A2; Col4: $7C ), //48
( {1} Col0: $00; Col1: $42; Col2: $FE; Col3: $02; Col4: $00 ),
( {2} Col0: $46; Col1: $8A; Col2: $92; Col3: $92; Col4: $62 ),
( {3} Col0: $44; Col1: $92; Col2: $92; Col3: $92; Col4: $6C ),
( {4} Col0: $F0; Col1: $10; Col2: $10; Col3: $10; Col4: $FE ),
( {5} Col0: $F4; Col1: $92; Col2: $92; Col3: $92; Col4: $8C ),
( {6} Col0: $7C; Col1: $92; Col2: $92; Col3: $92; Col4: $4C ),
( {7} Col0: $C0; Col1: $80; Col2: $8E; Col3: $90; Col4: $E0 ),
( {8} Col0: $6C; Col1: $92; Col2: $92; Col3: $92; Col4: $6C ),
( {9} Col0: $64; Col1: $92; Col2: $92; Col3: $92; Col4: $7C ),
( {:} Col0: $00; Col1: $00; Col2: $24; Col3: $00; Col4: $00 ),
( {;} Col0: $00; Col1: $02; Col2: $24; Col3: $00; Col4: $00 ),
( {<} Col0: $10; Col1: $28; Col2: $44; Col3: $82; Col4: $00 ),
( {=} Col0: $28; Col1: $28; Col2: $28; Col3: $28; Col4: $28 ),
( {>} Col0: $00; Col1: $82; Col2: $44; Col3: $28; Col4: $10 ),
( {?} Col0: $40; Col1: $80; Col2: $9A; Col3: $90; Col4: $60 ), //63
( {@} Col0: $7C; Col1: $92; Col2: $AA; Col3: $BA; Col4: $70 ),
( {A} Col0: $7E; Col1: $90; Col2: $90; Col3: $90; Col4: $7E ), //65
( {B} Col0: $FE; Col1: $92; Col2: $92; Col3: $92; Col4: $6C ),
( {C} Col0: $7C; Col1: $82; Col2: $82; Col3: $82; Col4: $44 ),
( {D} Col0: $FE; Col1: $82; Col2: $82; Col3: $82; Col4: $7C ),
( {E} Col0: $FE; Col1: $92; Col2: $92; Col3: $92; Col4: $82 ),
( {F} Col0: $FE; Col1: $90; Col2: $90; Col3: $90; Col4: $80 ),
( {G} Col0: $7C; Col1: $82; Col2: $92; Col3: $92; Col4: $5C ),
( {H} Col0: $FE; Col1: $10; Col2: $10; Col3: $10; Col4: $FE ),
( {I} Col0: $82; Col1: $82; Col2: $FE; Col3: $82; Col4: $82 ),
( {J} Col0: $04; Col1: $02; Col2: $02; Col3: $02; Col4: $FC ),
( {K} Col0: $FE; Col1: $10; Col2: $28; Col3: $44; Col4: $82 ),
( {L} Col0: $FE; Col1: $02; Col2: $02; Col3: $02; Col4: $02 ),
( {M} Col0: $FE; Col1: $40; Col2: $20; Col3: $40; Col4: $FE ),
( {N} Col0: $FE; Col1: $20; Col2: $10; Col3: $08; Col4: $FE ),
( {O} Col0: $7C; Col1: $82; Col2: $82; Col3: $82; Col4: $7C ),
( {P} Col0: $FE; Col1: $90; Col2: $90; Col3: $90; Col4: $60 ),
( {Q} Col0: $7C; Col1: $82; Col2: $82; Col3: $86; Col4: $7E ),
( {R} Col0: $FE; Col1: $90; Col2: $90; Col3: $90; Col4: $6E ),
( {S} Col0: $64; Col1: $92; Col2: $92; Col3: $92; Col4: $4C ),
( {T} Col0: $80; Col1: $80; Col2: $FE; Col3: $80; Col4: $80 ),
( {U} Col0: $FC; Col1: $02; Col2: $02; Col3: $02; Col4: $FC ),
( {V} Col0: $E0; Col1: $18; Col2: $06; Col3: $18; Col4: $E0 ),
( {W} Col0: $FC; Col1: $02; Col2: $0C; Col3: $02; Col4: $FC ),
( {X} Col0: $C6; Col1: $28; Col2: $10; Col3: $28; Col4: $C6 ),
( {Y} Col0: $C0; Col1: $20; Col2: $1E; Col3: $20; Col4: $C0 ),
( {Z} Col0: $86; Col1: $8A; Col2: $92; Col3: $A2; Col4: $C2 ), //90
( {[} Col0: $00; Col1: $FE; Col2: $82; Col3: $82; Col4: $00 ),
( {\} Col0: $40; Col1: $20; Col2: $10; Col3: $08; Col4: $04 ),
( {]} Col0: $00; Col1: $82; Col2: $82; Col3: $FE; Col4: $00 ),
( {^} Col0: $20; Col1: $40; Col2: $80; Col3: $40; Col4: $20 ),
( {_} Col0: $02; Col1: $02; Col2: $02; Col3: $02; Col4: $02 ),
( {`} Col0: $00; Col1: $00; Col2: $C0; Col3: $20; Col4: $00 ),
( {a} Col0: $04; Col1: $2A; Col2: $2A; Col3: $2A; Col4: $1E ), //97
( {b} Col0: $FE; Col1: $22; Col2: $22; Col3: $22; Col4: $1C ),
( {c} Col0: $1C; Col1: $22; Col2: $22; Col3: $22; Col4: $14 ),
( {d} Col0: $1C; Col1: $22; Col2: $22; Col3: $22; Col4: $FE ),
( {e} Col0: $1C; Col1: $2A; Col2: $2A; Col3: $2A; Col4: $18 ),
( {f} Col0: $10; Col1: $7E; Col2: $90; Col3: $90; Col4: $40 ),
( {g} Col0: $10; Col1: $2A; Col2: $2A; Col3: $2A; Col4: $1C ),
( {h} Col0: $FE; Col1: $20; Col2: $20; Col3: $20; Col4: $1E ),
( {i} Col0: $00; Col1: $22; Col2: $BE; Col3: $02; Col4: $00 ),
( {j} Col0: $00; Col1: $02; Col2: $BC; Col3: $00; Col4: $00 ),
( {k} Col0: $FE; Col1: $08; Col2: $08; Col3: $14; Col4: $22 ),
( {l} Col0: $00; Col1: $82; Col2: $FE; Col3: $02; Col4: $00 ),
( {m} Col0: $3E; Col1: $20; Col2: $3E; Col3: $20; Col4: $1E ),
( {n} Col0: $3E; Col1: $20; Col2: $20; Col3: $20; Col4: $1E ),
( {o} Col0: $1C; Col1: $22; Col2: $22; Col3: $22; Col4: $1C ),
( {p} Col0: $3E; Col1: $28; Col2: $28; Col3: $28; Col4: $10 ),
( {q} Col0: $10; Col1: $28; Col2: $28; Col3: $28; Col4: $3E ),
( {r} Col0: $3E; Col1: $20; Col2: $20; Col3: $20; Col4: $10 ),
( {s} Col0: $12; Col1: $2A; Col2: $2A; Col3: $2A; Col4: $24 ),
( {t} Col0: $20; Col1: $FC; Col2: $22; Col3: $22; Col4: $00 ),
( {u} Col0: $3C; Col1: $02; Col2: $02; Col3: $02; Col4: $3E ),
( {v} Col0: $38; Col1: $04; Col2: $02; Col3: $04; Col4: $38 ),
( {w} Col0: $3C; Col1: $02; Col2: $0C; Col3: $02; Col4: $3C ),
( {x} Col0: $22; Col1: $14; Col2: $08; Col3: $14; Col4: $22 ),
( {y} Col0: $22; Col1: $14; Col2: $08; Col3: $10; Col4: $20 ),
( {z} Col0: $22; Col1: $26; Col2: $2A; Col3: $32; Col4: $22 ), //122
( { } Col0: $00; Col1: $10; Col2: $6C; Col3: $82; Col4: $00 ), // {
( {|} Col0: $00; Col1: $00; Col2: $FE; Col3: $00; Col4: $00 ), //124
( { } Col0: $00; Col1: $82; Col2: $6C; Col3: $10; Col4: $00 ), // }
( {~} Col0: $40; Col1: $80; Col2: $40; Col3: $20; Col4: $40 ) //126
);
编译通过 !!!!