On 16.04.2017 18:52, fredvs wrote: > Free Pascal - General mailing list wrote >> function mpg123_icy(mh: Tmpg123_handle; var icy_meta: PChar): Integer; >> cdecl; > > Thanks for your answer. > > I did try with this but : > > res := mpg123_icy(mph,theicytag); > > if (res = 0) then writeln('resu = ' + inttostr(res)); // OK = 0 > > if Assigned(theicytag) then writeln('theicytag = assigned') > else writeln('theicytag NOT assigned') ; /// always theicytag NOT assigned
According to the code it also returns 0 with icy_meta being Nil if there is no corresponding data: https://github.com/georgi/mpg123/blob/master/src/libmpg123/libmpg123.c#L1384 Regards, Sven _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal