Free Pascal - General mailing list wrote
> resu := mpg123_icy(ahandle, theicytag);
> if (resu = 0) and Assigned(theicytag) and Assigned(theicytag^)
> then writeln(theicytag^);
Hello and thanks for answer.
Indeed, that way no more crash but also nothing from writeln(theicytag^).
I did a check with this:
resu := mpg123_icy(ahandle, theicytag);
if (resu = 0) then writeln('resu = ' + inttostr(resu)); ---> OK
if Assigned(theicytag) then writeln('theicytag = assigned')
else writeln('theicytag NOT assigned') ; ---> theicytag NOT assigned
if Assigned(theicytag^) then writeln('theicytag^ = assigned')
else writeln('theicytag^ NOT assigned') ; ---> raise exception + crash
?
Fre;D
-----
Many thanks ;-)
--
View this message in context:
http://free-pascal-general.1045716.n5.nabble.com/Get-value-of-PPChar-tp5728277p5728280.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
