Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   problema con TSqlConnection (https://www.clubdelphi.com/foros/showthread.php?t=49004)

totote 10-10-2007 15:02:42

problema con TSqlConnection
 
buenas gente estamos haciendo un tp para la facu, es para entender el concepto de clases, el tema no tiene mucho que ver con esto, ya que estamos haciendo un programa de consola y todo es por codigo, el problema surge cuando queremos crear un componente TSqlConecction que nos tira un error de acces violation algo poco comun en windows no? :P este es el codigo de la clase

Código Delphi [-]
Type
  TFacturaVentaPersist=Class
  Private
    Conx: TSQLConnection;
    Q: TSqlDataset;
  Public
    Constructor Create;
    Destructor Destroy;
    Procedure Guardar (F: TFacturaVenta);

    Function GetGenerator(Const NombreGen: String):Integer;
    Function GetSecuencia(Tipo: Char):Integer;

    Procedure GrabarItem (I: TitemFactura);
    Function Buscar(IdFactura: Integer):TFacturaVenta; Overload; // reconoce la diferencia de las funciones con mismos nombres de acuerdo a sus parametros
    Function Buscar (Tipo: char; NroSuc: Integer; NroComp:Integer):TFacturaVenta; Overload;
    Function BuscarFactura (Fecha: TDateTime):TObjectlist; Overload;
  End;

el problema esta en el constructor, este es el codigo:

Código Delphi [-]
constructor TFacturaVentaPersist.Create;
begin

  Conx:=TSQLConnection.create(nil); // <-- Aca es donde genera el error
  Conx.Connectionname:='Lab4';      // <-- a esta linea nunca se llego XD
  Conx.LoadParamsOnConnect:=True;
  Conx.Open;

end;

y este es el error que esta tirando:



si nos pueden ayudar se los voy a agradecer mucho :D

duilioisola 10-10-2007 15:34:29

Yo encontré esto en el Help de Delphi:
Cita:

Creates and initializes an instance TSQLConnection.

constructor Create(AOwner: TComponent); override;

Description


Use Create to instantiate TSQLConnection at runtime. SQL connections added to forms or data modules at design time are created automatically.

The AOwner parameter is the component, typically a form or data module, that is responsible for freeing the SQL connection.

No se si tendrá algo que ver, pero quizás no acepte nil como parámetro.

totote 10-10-2007 15:44:14

changos estamos en problemas porque no tengo ni form ni datamodule nada como es todo por consola no tenemos nada :S

juanelo 10-10-2007 16:27:31

Que tal,
El motivo por el cual creo te error, es que como es consola no se esta creando el entorno de VCL en tu aplicacion, y este componente necesita de la VCL para poder funcionar.
Saludos


La franja horaria es GMT +2. Ahora son las 10:23:57.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi