home *** CD-ROM | disk | FTP | other *** search
/ Delphi Anthology / aDELPHI.iso / Runimage / Delphi50 / Demos / Activex / Tregsvr / regconst.pas next >
Pascal/Delphi Source File  |  1999-08-11  |  1KB  |  31 lines

  1. unit regconst;
  2.  
  3. interface
  4.  
  5. resourcestring
  6.   SAbout = 'Borland Turbo Register Server -- COM Server Registration utility.' +
  7.     #13#10'Version 1.1.  Copyright (c) 1997,99 Inprise Corporation'#13#10;
  8.   SUsage = 'Syntax: TREGSVR [options] filename'#13#10 +
  9.     '  -u  =  Unregister server or type library'#13#10 +
  10.     '  -q  =  Quiet (silent) operation'#13#10 +
  11.     '  -t  =  Register type library (default for .TLB files)'#13#10;
  12.   SFileNotFound = 'File "%s" not found';
  13.   SCantFindProc = '%s procedure not found in "%s"';
  14.   SRegFail = 'Call to %s failed in "%s"';
  15.   SLoadFail = 'Failed to load "%s"';
  16.   SRegSuccessful = 'Call to %s was successful!';
  17.   SRegStr = 'registered';
  18.   SUnregStr = 'unregistered';
  19.   STlbName = 'Type library name: %s';
  20.   STlbGuid = 'Type library GUID: %s';
  21.   STlbRegSuccessful = 'Type library successfully %s!';
  22.   SCantUnregTlb = 'The version of OLEAUT32.DLL on this machine does not ' +
  23.     'support type library unregistration.';
  24.   SNeedFileExt = 'You must specify a file extension for "%s"';
  25.   SExeRegSuccessful = '%s successfully called.';
  26.   SExeRegUnsuccessful = '%s failed.';
  27.  
  28. implementation
  29.  
  30. end.
  31.