Flere return values fra DLL'er

Hejsa.

Jeg bruger vedlagte  kode til at loade en dll, men jeg vil gerne have flere values retur fra dll'en.
Hvordan gør jeg det ??

procedure TForm1.Button1Click(Sender: TObject);
var
  Col: Integer;
  StddllProc: TStddllProc;
  FPointer: TFarProc;
begin
  hInstDll := SafeLoadLibrary ('StdDll.dll');
  if hInstDll <= 0 then
    raise Exception.Create ('FormDllD library not found');
  FPointer := GetProcAddress (hInstDll, 'LoadDll');
  if FPointer = nil then
    raise Exception.Create ('StdDLL load function not found');
  StddllProc := TStddllProc (FPointer);
// Col := ColorToRGB (Color);
  StddllProc (Col);
end;


Hilsen

Finn