제가 배포판을 만들어 ocx를 등록하려고 하는데 msvcrt.dll의 버전이 낮은 곳에서는 등록이 되질 않고 다시 재부팅하고 다시 setup file을 실행시켜야 합니다. 다른 윈도우 응용 프로그램을 실행시키거나 또는 visual basic의 배포판 마법사로 배포판을 만들경우 재부팅되면서 자동으로 프로그램이 인스톨되어집니다. 이렇게 프로그램을 만들려고 하니 dll 버전을 체크하여 낮은 버전이면 재부팅 후 다시 프로그램을 실행시키라는 메세지를 주고 싶습니다. 아시는 분은 연락주세요... 좋은 하루되세요.
uses
RxVerInf;
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
var
versioninfo : TVersionInfo;
begin
try
VERSIONINFO := TVersionInfo.Create(Edit1.Text);
With Memo1.Lines do
begin
Add( VERSIONINFO.CompanyName );
Add( IntToStr( VERSIONINFO.VersionNum ) );
Add(VERSIONINFO.Comments);
Add(VERSIONINFO.CompanyName);
Add(VERSIONINFO.FileDescription);
Add(VERSIONINFO.FileVersion);
Add(VERSIONINFO.InternalName);
Add(VERSIONINFO.LegalCopyright);
Add(VERSIONINFO.LegalTrademarks);
Add(VERSIONINFO.OriginalFilename);
Add(VERSIONINFO.ProductVersion);
Add(VERSIONINFO.ProductName);
Add(VERSIONINFO.SpecialBuild);
Add(VERSIONINFO.PrivateBuild);
Add( DateToStr( VERSIONINFO.VerFileDate ));
end;
finally
VERSIONINFO.Free;
end;
end;
end.