Hi!

I'm using Delphi 7 Pro and DBISAM 4.
I need to check if client-side app version if lower (or different) than the
server-side version of my app, just to alert the user and advice him to
update the server-app or client-app.

Is it possible to get some information of this kind from the Server? or some
method to send (or get) a variable from the server when the client connects.

For example:
   At server-side:
       Engine.variable1 := '1.1';

At client-side:
   when connected to the server
       if session.variable1 <> appversion then  ......

Thanks!

"Santy Concepción" <santyweb@hotmail.com> wrote in message
news:01E03887-C1DD-4ED9-A01F-E4514E415741@news.elevatesoft.com...
> Hi!
>
> I'm using Delphi 7 Pro and DBISAM 4.
> I need to check if client-side app version if lower (or different) than
> the server-side version of my app, just to alert the user and advice him
> to update the server-app or client-app.
>

I use one of my tables minor version for this. Especially handy if the new
version involves restructuring of tables and you don't want the apliction to
even attempt to open tables. Works great.

Robert

Ok, it seems to be an option, but I should change the table version on each
app release, and tables are not updated with the new installations. I was
searching for an alternative method that not require using the table
version.

Is it possible?


"Robert" <ngsemail2005withoutthis@yahoo.com.ar> escribió en el mensaje de
noticias:415F1A34-0BC4-4DA5-9205-429D80AB6C8B@news.elevatesoft.com...
>
> "Santy Concepción" <santyweb@hotmail.com> wrote in message
> news:01E03887-C1DD-4ED9-A01F-E4514E415741@news.elevatesoft.com...
>> Hi!
>>
>> I'm using Delphi 7 Pro and DBISAM 4.
>> I need to check if client-side app version if lower (or different) than
>> the server-side version of my app, just to alert the user and advice him
>> to update the server-app or client-app.
>>
>
> I use one of my tables minor version for this. Especially handy if the new
> version involves restructuring of tables and you don't want the apliction
> to even attempt to open tables. Works great.
>
> Robert
>
>

Santy,

<< Is it possible to get some information of this kind from the Server? or
some method to send (or get) a variable from the server when the client
connects. >>

Just check this property on the client after connecting:

http://www.elevatesoft.com/dbisam4d7_tdbisamsession_getremoteengineversion.htm

And take the appropriate action as necessary afterwards.

--
Tim Young
Elevate Software
www.elevatesoft.com

Thanks, Tim... but I need to get my app version, not the EngineVersion.
I should use "EngineVersion" variable to set the main app version, but
"EngineVersion" is read-only.

Is there any other server property/variable I can get from clients?
Maybe using ServerProcedures?
Any method for sending/receiving data between server-clients?

Thanks in advance


"Tim Young [Elevate Software]" <timyoung@elevatesoft.com> escribió en el
mensaje de
noticias:19A9F895-DDC4-4CD5-BEB1-BF3FDE18D1DD@news.elevatesoft.com...
> Santy,
>
> << Is it possible to get some information of this kind from the Server? or
> some method to send (or get) a variable from the server when the client
> connects. >>
>
> Just check this property on the client after connecting:
>
> http://www.elevatesoft.com/dbisam4d7_tdbisamsession_getremoteengineversion.htm
>
> And take the appropriate action as necessary afterwards.
>
> --
> Tim Young
> Elevate Software
> www.elevatesoft.com
>

Luis,

> Is there any other server property/variable I can get from clients?
> Maybe using ServerProcedures?
> Any method for sending/receiving data between server-clients?

You can use a server side procedure to return anything you like to the
client. In this case, something like the following should do it:


procedure TMainForm.ServerEngineServerProcedure(Sender: TObject;
  ServerSession: TDBISAMSession; const ProcedureName: String);
begin
  if AnsiCompareText(ProcedureName,'APP_VERSION') = 0 then begin
    with ServerSession.RemoteParams do begin
      Clear;
      CreateParam(ftString,'APP_VERSION').AsString := '2.01';
    end;
  end;
end;

Eryk

I finally got it using 'ServerDescription' property and
'GetServerDescription' function from clients.

Thanks!


"Eryk Bottomley" <no@way.com> escribió en el mensaje de
noticias:DF359E4D-116B-42E8-B8AE-C081FC41EF02@news.elevatesoft.com...
> Luis,
>
>> Is there any other server property/variable I can get from clients?
>> Maybe using ServerProcedures?
>> Any method for sending/receiving data between server-clients?
>
> You can use a server side procedure to return anything you like to the
> client. In this case, something like the following should do it:
>
>
> procedure TMainForm.ServerEngineServerProcedure(Sender: TObject;
>   ServerSession: TDBISAMSession; const ProcedureName: String);
> begin
>   if AnsiCompareText(ProcedureName,'APP_VERSION') = 0 then begin
>     with ServerSession.RemoteParams do begin
>       Clear;
>       CreateParam(ftString,'APP_VERSION').AsString := '2.01';
>     end;
>   end;
> end;
>
> Eryk