Dll dinâmica em Delphi8

Pessoal.... preciso de ajuda para poder chamar Dlls dinamicamente no Delphi8. As Dlls são feitas em Delphi 8 também.

Todo material que encontrei na Web apresenta o mesmo modelos a seguir que não funciona:

type
TProc = function : boolean of Object;
var
MyH : THandle;
Proc : TProc;
begin
MyH := LoadLibrary(´Imprime_CAPCA.dll´);
if MyH <> 0 then
begin
@Proc := GetProcAddress(MyH,´Impime_Ticket_Pesagem´).ToPointer;
if @Proc <> nil then
Proc;
end;
FreeLibrary(MyH);
end;

Gostaria de saber se alguém já fez isso no Delphi8 e funcionou pois até agora todos os exemplos que testei falharam.

Obrigado.