Fichiers Binaire.

Salut !

Voila j'essaye de faire une fonction qui lis un block par rapport a ce que l'on lui dis mais je n'y arrive pas

Il veux pas accepter ca :

function LireBlock(Offset : Integer; Buffer : Array [1..1024] Of Char) :String;
var
F : File;
begin
{$I-}
AssignFile(F,'SETTINGS.DAT');
Reset(F,1);
Seek(F, Offset);
BlockRead(F, Buffer, SizeOf(Buffer));
Result := Buffer;
{$I+}
end;




Il aime pas : Buffer : Array [1..1024]




Sinon en fait je voudrais que ca fasse :

LireBlock(Offset, Regler le Buffer)
LireBlock($C3, 1)



Enfin bref, le but est de lire un fichier !

Je connais une partie de la structure

Je c'est que je dois aller a l'offset $C3 et je dois relever la valeur Hexa !

Mais deja je ne c'est pas si utiliser FileStream ou alors la methode standard !!


Aussis pour ne pas faire plein de fois le meme code, j'ai voulu faire cette fonction !

Car c'est pas toujours à $C3
Apres je dois relever ailleur.


Merci


PS: Le projet est pour l'iBead 100+ pour lire le fichiers SETTINGS.DAT
--
Site : www.delphi-projets.fr.st"
Email : mailto:amokers@yahoo.fr
ICQ : 150576014
MSN : amokers@msn.com
(No email please just for MSN Messenger)

function LireBlock(Offset : Integer; Buffer : Pchar;BufferSize:Integer) :String;
var
F : File;
begin
{$I-}
AssignFile(F,'SETTINGS.DAT');
Reset(F,1);
Seek(F, Offset);
BlockRead(F, Buffer, BufferSize);
Result := strpas(Buffer);
CloseFile(f);
{$I+}
end;

l'appel:
var buffer:Array[0..1024] of char;

LireBlock(offset,Buffer,1024);

Bon Coding ....

ManChesTer.

 salu jaimerai bien savoir coment detecter qui vous bloque sur msn
    et je ne c pa komen faire ni ou telecharger ce logiciel  svp envoyer moi un courier pr limformation que je demande
merci