Discussion :

[Andry]

Salut à tous.
J'ai lu pas mal de tuto et livre sur la conception de composant.
Mais j'ai du mal a me decider comment organiser le packet.
On parle tout le temps de packet de conception et d'execution, mais dans la pratique c'est pas si evident à mettre en oeuvre.
Disons que voici mon composant :

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
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
 
type
  TTestCompo = class(TComponent)
  private
    FCustNo: Integer;
    FIbDatabase: TIbdatabase;
    FIbTransaction: TIBTransaction;
    FQryDossier: TIbQuery;
    procedure SetCustNo(const Value: Integer);
    procedure SetIbDatabase(const Value: TIbdatabase);
    procedure SetIbTransaction(const Value: TIBTransaction);
    procedure SetQryDossier(const Value: TIbQuery);
    { Déclarations privées }
  protected
    { Déclarations protégées }
    procedure UpdateQuery;
    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
  public
    { Déclarations publiques }
    constructor Create(AOwner : TComponent); override;
    destructor  Destroy;override;
    procedure   Load;
    procedure   Delete;
    procedure   Update;
    procedure   Insert; 
    procedure   ListQryDossier;
    procedure   CloseQryDossier;
  published
    { Déclarations publiées }
    property IbDatabase     : TIbdatabase read FIbDatabase write SetIbDatabase;
    property IbTransaction  : TIBTransaction read FIbTransaction write SetIbTransaction;
    property CustNo         : Integer read FCustNo write SetCustNo default 0;
    property QryDossier     : TIbQuery read FQryDossier write SetQryDossier;
  end;
procedure Register;

Regardons ce code :
Les methodes Update,Delete,Insert sont specialement utiliser en execution.
Les methodes Load, ListQryDossier, CloseQryDossier peut être utiliser en mode conception, mais aussi en mode execution.
Comment dois je organiser mes unités et mes paquets ?


Merci aus âmes charritables.

A+

[neilbgr]

La procédure Register peut etre mise à part dans un paquet dit de DesignTime car cela n'a rien a voir à l'execution; c'est bien pour l'intégration dans l'IDE de Delphi.

En revanche, ton compo, il est forcément au moins en Execution, car tu l'utilses bien et surtout en execution.

Recap:

PckRutimeTonCompo contient
l'unité :
UTonCompo.pas

PckDesignTonCompo contient
l'untié :
URegisterTonCompo.pas (avec la procédure register pour registerer ton compo !)
le required :
PckRutimeTonCompo .dcp

Tu peux préciser a Delphi que PckDesignTonCompo est bien un paquet de Conception seulement.
Enfin, seul le paquet PckDesignTonCompo est a installer dans delphi, l'autre paquet Delphi s'en chargera.

[Andry]

En gros, si je suit biens ton raisonnement :
Si j'ai 10 compos dans 10 unité, j'integrer ces 10 unités dans le paquet PckRutimeCompo.
Je dois creer une unité qui vas juste contenir les editeurs de propriétés et editeur de composant et registeré ces 10 composants et leurs editeurs (propriété ou composant) et integrer cette unique unité dans le PckDesignCompo.

Bon, je mets ça en place et on verras.

Merci

[neilbgr]

Exactement !