Discussion :

[juliano77]

Bonjour à tous.

Dès que j'utilise une methode de la classe TQuery, Delphi me lève une Exception de type "Violation d'accès".
Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
function TUsine.RequestSQL(Meuble : String) : String;
begin
     NomFournisseur.SQL.Add('select * from TArticle');
end;

Ce code me revoit "Violation d'accès à l'adresse XXXXXXXX"

Je ne comprends pas ...

Merci de vos réponses.

[ero-sennin]

Salut,

Bonjour à tous.

Dès que j'utilise une methode de la classe TQuery, Delphi me lève une Exception de type "Violation d'accès".
Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
function TUsine.RequestSQL(Meuble : String) : String;
begin
     NomFournisseur.SQL.Add('select * from TArticle');
end;

Ce code me revoit "Violation d'accès à l'adresse XXXXXXXX"

Je ne comprends pas ...

Merci de vos réponses.

TUsine est le nom de ta form ?
Si tu fais une fonction, il te manque le Result ...

Bref, il nous manque un peu de code et de précisions
Merci

[Cl@udius]

Salut

Est-ce NomFournisseur est créé dynamiquement ? Et si oui existe-t-il au moment de l'appel.

Tu peux t'en assurer avec un: if Assigned() then...

@+ Claudius

[juliano77]

Avant tout merci pour vos réponses.

Usine est mon TForm.
NomFournisseur est mon TQuery.

NomFournisseur est déclaré au début en dur.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
unit UtraiteUsine;
 
interface
 
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, ADODB, DBTables, UAccess;
 
type
  TUsine = class(TForm)
    NomFournisseur: TQuery;
    RefConf: TDatabase;
 
  function RequestSQL(Meuble : String) : String;
 
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;

Pour le result, je d'accord, mais je n'aurais pas ce type d'erreur.

[Cl@udius]

Re,

NomFournisseur est déclaré au début en dur.

Pour être bien sûr, c'est bien un composant que tu as déposé sur ta fiche ?

[juliano77]

Oui je l'ai bien déposé sur ma fiche.

Je sais plus quoi faire.

Peut-être cela pourra vous aider, mais j'arrive à activer une requête via l'inspecteur d'objet.
Je pense que le programme ne veut pas que j'accède au méthodes de TQuery.

Malheuresment, c'est la que je bloque.