Hi, after compiling my apps and server with DBISAM V4.30 Build 1 my only Server Procedure no longer works. It fails on the client at the source line marked **** below:

function GetIPAddress(ASession: TDBISAMSession): string;
begin
 with ASession.RemoteParams do
   CreateParam(ftInteger, 'CurrentRemoteID').AsInteger := ASession.CurrentRemoteID;
 with ASession do
 try
   CallRemoteProcedure('GetClientIPAddress');
   Result := RemoteParams.ParamByName('IPAddress').AsString; ****
 except
   on E: Exception do
   Result := '$$INVALID$$';
 end;
end;


If I revert to the previous server executable (V4.29B3) everything works OK.

The problem (symptom anyway) appears in function TDBISAMParams.FindParam (dbisamtb) where Count has an initial value of 0 instead of 1 therefore the code is never executed.

I can see that there were a lot of changes in dbisamtb for V4.30 - could the changes be responsible?

Server is compiled with D2007 and client apps with D5

Thanks, Tony.

Problem solved.

Somehow the OnServerProcedure event in the server app was no longer connected to its event handler after upgrading to V4.30.

I connected the event to the event handler and all is well.

I discovered this with Gurock SmartInspect which I have owned for some time but never used - I guess it just paid for itself