Error: Can't assign values to an address

[ZeImp]

I've this error in this procedure :

Code: [Select]


procedure TD2VProject.InitialiseMPEG2DecDll;
begin
  MPEG2DecDllHandle := LoadLibrary( PChar(MPEG2DecDllFileName) );
  if MPEG2DecDllHandle <> 0 then
  begin
    @OpenMPEG2Dll   := GetProcAddress(MPEG2DecDllHandle, 'openMPEG2Source');
    @CloseVideoDll  := GetProcAddress(MPEG2DecDllHandle, 'closeVideo');
    @GetRGBFrameDll := GetProcAddress(MPEG2DecDllHandle, 'getRGBFrame');
  end;
end;


It works fine with Delphi 7 !

[Vincent Snijders]

The '@' symbol looks strange to me. I would write this as (in {$mode objfpc}):

Code: [Select]

procedure TD2VProject.InitialiseMPEG2DecDll;
begin
  MPEG2DecDllHandle := LoadLibrary( PChar(MPEG2DecDllFileName) );
  if MPEG2DecDllHandle <> 0 then
  begin
    OpenMPEG2Dll   := GetProcAddress(MPEG2DecDllHandle, 'openMPEG2Source');
    CloseVideoDll  := GetProcAddress(MPEG2DecDllHandle, 'closeVideo');
    GetRGBFrameDll := GetProcAddress(MPEG2DecDllHandle, 'getRGBFrame');
  end;
end;

If you compiled the with {$mode deplphi} and get this error, consider reporting this incompatibilty at the Free Pascal Bug Tracker.

[ZeImp]

Your code (without @) doesn't work :

Code: [Select]

Error: Incompatible types: got "Pointer" expected "

How can I use {$mode objfpc} or {$mode deplphi} ? What does it mean ?

Thx,
ZeImp.

[Vincent Snijders]

Expected what? "

Did you declare OpenMPEG2Dll etc as procedure variables?

See the Code conversion guide about the differences between mode Delphi and objfpc.

[Vincent Snijders]

For examples of doing dynamic library loading, see the ACS component.