Hi,
Looking at the C-code again, I saw I could actually use a pointer to
byte, instead of a pointer to an array of bytes.
So I'm using this :
program LCDtest1;
var
nCols : cardinal;
nRows : cardinal;
nBytes : cardinal;
pFont : ^byte;
{$include fonts.inc}
begin
// get pointer to the beginning of the selected font table
pFont:=@FONT6x8;
nCols:=pFont^;
nRows:=(pFont+1)^;
nBytes:=(pFont+2)^;
end.
Now my library works.
Thanks,
Koenraad Lelong.
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
