Can you give more information about your function.

=============INTOSOFT============

           ALEXIO CHAOS

   [email protected]   

          Yahoo Messager

=================================

--- On Mon, 1/19/09, Dave Coventry <[email protected]> wrote:

From: Dave Coventry <[email protected]>
Subject: [Lazarus] Passing an array to a function
To: [email protected]
Date: Monday, January 19, 2009, 6:20 AM

I have a function that I'm trying to pass an array to.

function FieldValueAsString(fsbuffer: array of Byte; fitype,fisize:
integer): string;

Calling the function:

setlength(fsbuffer,recordsize);
FS:=TFileStream.Create(fname, fmshareDenyWrite);
FS.Seek(seekpos,soFromBeginning);
FS.ReadBuffer(fsbuffer,recordsize);
dfstring:= FieldValueAsString(fsbuffer,fitype,fisize);

Generates the error "Project raised exception class SIGSEGV"
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus



      
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to