Subject | Re: Udr GenRows sample Pascal |
---|---|
Author | Norbert Saint Georges |
Post date | 2018-05-15T05:38:08Z |
'livius' liviuslivius@... [firebird-support] a écrit :
var
ss : ansistring;
begin
try
setlength(ss,15);
ss := blabla...
move(pchar(ss)^,_outbuffer[_outmessage[0].Offset+2],_outmessage[0].length-2);
finally
setlength(ss,0);
end;
end;
--
Norbert Saint Georges
http://tetrasys.fi
> what kind of buffer?for me
> I have tried:
> ss: Array[0..199] of Char;
> ss: Array[0..199] of Byte;
> ss: Array[0..199] of AnsiChar;
> ss: String[200];
var
ss : ansistring;
begin
try
setlength(ss,15);
ss := blabla...
move(pchar(ss)^,_outbuffer[_outmessage[0].Offset+2],_outmessage[0].length-2);
finally
setlength(ss,0);
end;
end;
--
Norbert Saint Georges
http://tetrasys.fi