[fpc-pascal] Adding a array of float in ressource and use it ?

[fredvs]

Hello.

I have saved the buffer into file with a TFileStream.

With lot of success for array of cint16 and cint32.

But for array of cfloat --> much less success.

Could it be that TFileStream does accept only integers as data ?
If yes, a conversion would be needed ?

Something like: ?

for x := 0 to length(floatbuffer) -1 do
  begin
   floatbuffer[x] := round(floatbuffer[x] * 2147483647);
   if floatbuffer[x] > 2147483647 then floatbuffer[x] := 2147483647;
   if floatbuffer[x] < -2147483647 then floatbuffer[x] := -2147483647;
  end;
 

Thanks.

Fre;D






-----
Many thanks ;-)
--
View this message in context: http://free-pascal-general.1045716.n5.nabble.com/Adding-a-array-of-float-in-ressource-and-use-it-tp5727765p5727775.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.