[Webinar] Streamline your web hosting managementRegister Today

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 3541
  • Last Modified:

RxLib

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

0
danival_lucas
Asked:
danival_lucas
1 Solution
 
sas13Commented:
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?
0
 
danival_lucasAuthor Commented:
Hi,

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

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now