<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>> To: fpc-pascal@lists.freepascal.org<br><div>> From: el.es.cr@gmail.com<br>> Date: Mon, 13 Jan 2014 12:52:51 +0000<br>> Subject: Re: [fpc-pascal] windows.GetProcAddress() vs DynLibs.GetProcAddress()<br>> <br>> Hi,<br>> <br>> 'scue me if I did not catch something, but<br>> <br>> On 13/01/14 12:13, Fred van Stappen wrote:<br>> [...]<br>> <br>> >> > procedure InitLib(LibFile : PAnsiChar);<br>> >> > begin<br>> >> > LibHandle:=DynLibs.LoadLibrary(libfilename);<br>> >> > if LibHandle <> DynLibs.NilHandle then<br>> >> > <br>> >> > Pointer(soundtouch_createInstance) := DynLibs.GetProcedureAddress(LibHandle, PAnsiChar('soundtouch_createInstance'));<br>> >> <br>> /// why not just :<br>> <br>> @soundtouch_createInstance := DynLibs.GetProcedureAddress(LibHandle, PAnsiChar('soundtouch_createInstance')); <br>> <br>> (or without the PAnsiChar cast as Michael said:)<br>> <br>> @soundtouch_createInstance := DynLibs.GetProcedureAddress(LibHandle, 'soundtouch_createInstance'); <br>> <br>> ?<br>> <br>> <br>> >> Remove the typecast PansiChar()<br>> >> <br>> >> Michael.<br>> [...]<br>> > <br>> > What is the value of Pointer(soundtouch_createInstance) after the above statement ? Is it nil ?<br>> > <br>> > Michael.<br>> > <br>> > Thanks for answer Michael.<br>> > <br>> > Hum, how can i get the value of pointer if the application crash when i do :<br>> > <br>> >>> FHandle := soundtouch_createInstance(); <br>> > <br>> > Maybe, i dont understood your question...<br>> > <br>> <br>> if Assigned(soundtouch_createInstance) then ShowMessage('Got good pointer for soundtouch_createInstance')<br>> else ShowMessage('soundtouch_createInstance not assigned);<br>> <br>> placed directly after the GetProcedureAddress call ?<br>___________<br><br>Hello Lucaz<br><br> /// why not just :<br>> <br>> @soundtouch_createInstance := DynLibs.GetProcedureAddress(LibHandle, PAnsiChar('soundtouch_createInstance')); <br>> <br><br>Get that error :<br><br>>> libSoundTouch.pas(56,5) Error: Can't assign values to an address<br></div> </div></body>
</html>