This site is temporarily down. Please come back. Determine the version of the BDE
DelphiFAQ Home Search:

Determine the version of the BDE

 

commentsThis article has not been rated yet. After reading, feel free to leave comments and rate it.

This function determines some information about the BDE (version):

uses 
  DbiTypes, DbiProcs, DbiErrs;
... 
function fDbiGetSysVersion(SysVerList: TStringList): SYSVersion;
begin
  Check(DbiGetSysVersion(Result));
  if SysVerList <> nil then
  begin
    with SysVerList do
    begin
      Clear;
      Add(Format('ENGINE VERSION=%d', [Result.iVersion]));
      Add(Format('INTERFACE LEVEL=%d', [Result.iIntfLevel]));
      Add(Format('VERSION DATE=%s', [DateToStr(Result.dateVer)]));
      Add(Format('VERSION TIME=%s', [TimeToStr(Result.timeVer)]));
    end;
  end;
end;
{from BDE32.hlp}

Content-type: text/html

Comments:

 

 

NEW: Optional: Register   Login
Email address (not necessary):

Rate as
Hide my email when showing my comment.
Please notify me once a day about new comments on this topic.
Please provide a valid email address if you select this option, or post under a registered account.
 

Show city and country
Show country only
Hide my location
You can mark text as 'quoted' by putting [quote] .. [/quote] around it.
Please type in the code:

Please do not post inappropriate pictures. Inappropriate pictures include pictures of minors and nudity.
The owner of this web site reserves the right to delete such material.

photo Add a picture: