We help IT Professionals succeed at work.

RxLib

danival_lucas
on
Medium Priority
3,940 Views
Last Modified: 2013-11-23
Hi,

I used to use in my applications the RxLib components (ToolEdit unit).
Now I'm using the RxLib2007 version (RxToolEdit unit).
I changed the uses clause of my form to use RxToolEdit instead of ToolEdit.
On this form I have a TDateEdit that is declared on the rxToolEdit unit.
But when I save my form's unit, Delphi automatically adds the ToolEdit on the uses clause and don't compile the application because the ToolEdit.dcu is not in my Library Path anymore.
Now I only have the rxToolEdit.dcu in my Library Path.

Why Delphi is inserting automatically this wrong unit on the uses clause?
Unit RSCaREST;
 
interface
 
uses
  SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,
  Forms, Dialogs, StdCtrls, Buttons, ExtCtrls, Mask, ComCtrls, Db, Halcn6DB,
  StTree, MaskUtils, DBClient,  IBODataset, RxToolEdit {this is the correct unit},
  IB_Components, ToolEdit {this is being added by Delphi automatically};
 
const
  WM_MYCLOSE = WM_USER + 1;
 
type
  TFormCalcularReST = class(TForm)
    StatusBar1: TStatusBar;
    Panel1: TPanel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label6: TLabel;
    Label7: TLabel;
    LabelDTInic: TLabel;
    Label9: TLabel;
    LabelDTFim: TLabel;
    LabelArquivo: TLabel;
    LabelFinalidade: TLabel;
    Label13: TLabel;
    LabelConvenio: TLabel;
    Label15: TLabel;
    LabelNatOpe: TLabel;
    Label17: TLabel;
    LabelCNPJ: TLabel;
    Label5: TLabel;
    LabelIE: TLabel;
    LabelRazSocial: TLabel;
    LabelMunicipioUF: TLabel;
    ButtonOK: TButton;
    ButtonFechar: TButton;
    RadioGroupECF: TRadioGroup;
    GroupBoxPrint: TGroupBox;
    ChKBoxPrintMovDiario: TCheckBox;
    ChkBoxPrintResGeral: TCheckBox;
    CheckBoxInc: TCheckBox;
    Label1: TLabel;
    DateEditEstInic: TDateEdit;
    HDTemp: THalcyonDataSet;
    SpeedButtonLocalizar: TSpeedButton;
    HDRes: THalcyonDataSet;
    CheckBoxDistFrequencia: TCheckBox;
    Label8: TLabel;
    Label10: TLabel;
    DateEditPerInic: TDateEdit;
    DateEditPerFim: TDateEdit;
    CheckBoxPrintProdRest: TCheckBox;
    LabelQtdProd: TLabel;
    HDNFS: THalcyonDataSet;
    IBOTableNF50: TIBOTable;
    IB_CursorPRCalc: TIB_Cursor;
    IB_CursorTabNF: TIB_Cursor;
    IB_CursorTabIE: TIB_Cursor;
    procedure FormCreate(Sender: TObject);
    procedure FormShow(Sender: TObject);
    procedure ButtonFecharClick(Sender: TObject);
    procedure ButtonOKClick(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
    procedure FormActivate(Sender: TObject);
    procedure DateEditEstInicExit(Sender: TObject);
    procedure SpeedButtonLocalizarClick(Sender: TObject);
    procedure DateEditPerInicExit(Sender: TObject);
    procedure DateEditPerFimExit(Sender: TObject);
  private
    sTempDBF, sTempCDX, sResDBF, sResCDX, sNFSDBF, sNFSCDX : string;
    MyListaDataEstoque : TStringList;
    QtdIE, QtdNF, QtdSelPR, n50, n54, n88 : integer;
    bInitReport, bIsTabIE, bIsTabNF, bRestituiST, bRestituiOP : boolean;
    procedure UmMyClose(var Message: TMessage); message WM_MYCLOSE;
    procedure CriarTempFile;
    procedure ContaReg60;
    procedure CalcRessST;
    procedure Grava54Sai;
    procedure Grava88(const s : string);
    procedure Grava60D;
    procedure Grava60I;
    procedure Grava60R;
    procedure CalcOne(const Produto, descricao,unidade : String;
                      const DTEstoque : TDateTime);
    function ChkIsRessarcivel : boolean;
    procedure ResumoGeral;
    function VerifyCFOP : string;
    procedure ExecDFCNPJ;
    procedure ExecDFUFCFOP;
    procedure ExecDFUF;
    procedure ExecDFCFOP;
    procedure ExecSaidaSemDestaque;
    Function IsCNPJGoverno(const cnpj : string) : boolean;
  public
  end;
var
  FormCalcularReST : TFormCalcularReST;
 
implementation

Open in new window

Comment
Watch Question

Commented:
do you have a string "RX Library Controls and Tools" in "Component->Install packages"?
What's a path of installed "RX Library Controls and Tools" package?
Hi,

I have uninstalled delphi and all components and installed all again.
This solve the problem.
Thanks everybody.

Not the solution you were looking for? Getting a personalized solution is easy.

Ask the Experts
Access more of Experts Exchange with a free account
Thanks for using Experts Exchange.

Create a free account to continue.

Limited access with a free account allows you to:

  • View three pieces of content (articles, solutions, posts, and videos)
  • Ask the experts questions (counted toward content limit)
  • Customize your dashboard and profile

*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

OR

Please enter a first name

Please enter a last name

8+ characters (letters, numbers, and a symbol)

By clicking, you agree to the Terms of Use and Privacy Policy.