Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2583 connectés 

  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  [D6] include : quelle syntaxe ?

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[D6] include : quelle syntaxe ?

n°1517225
HERIBERT
Posté le 20-02-2007 à 18:45:28  profilanswer
 

Bonsoir.  
 
Quelle est la syntaxe de la directive INCLUDE ? Où  la placer, dans le code ?  
 
[#009b63]unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls, ShellApi;
 
 
type
  TForm1 = class(TForm)
    Panel1: TPanel;
    Label1: TLabel;
 
   etc...
   
   
    private
    { Déclarations privées }
    public
    { Déclarations publiques }
end;
   
   
procedure copier(Handle:HWND;Source,Cible:String);
procedure machin(Chaine : string);
procedure chose;
 
 
var
  Form1: TForm1;
 
  Nom_Fichier : string;  
  etc  (autres variables globales)
   
 
implementation
 
 
{$R *.dfm}
 
 
procedure machin(Chaine : string);
begin
end;
 
etc... implémentation des autres procédures et fonctions
 
end.  
 

[/#002ad4]
Je place $INCLUDE fichier.pas ... où ça /?  
 
Merci ;)

Message cité 1 fois
Message édité par HERIBERT le 20-02-2007 à 18:46:28
mood
Publicité
Posté le 20-02-2007 à 18:45:28  profilanswer
 

n°1517573
HERIBERT
Posté le 21-02-2007 à 12:26:36  profilanswer
 

HERIBERT a écrit :

Bonsoir.  
 
Quelle est la syntaxe de la directive INCLUDE ? Où  la placer, dans le code ?  
 
[#009b63]unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls, ShellApi;
 
 
type
  TForm1 = class(TForm)
    Panel1: TPanel;
    Label1: TLabel;
 
   etc...
   
   
    private
    { Déclarations privées }
    public
    { Déclarations publiques }
end;
   
   
procedure copier(Handle:HWND;Source,Cible:String);
procedure machin(Chaine : string);
procedure chose;
 
 
var
  Form1: TForm1;
 
  Nom_Fichier : string;  
  etc  (autres variables globales)
   
 
implementation
 
 
{$R *.dfm}
 
 
procedure machin(Chaine : string);
begin
end;
 
etc... implémentation des autres procédures et fonctions
 
end.  
 

[/#002ad4]
Je place $INCLUDE fichier.pas ... où ça /?  
 
Merci ;)


:cry:

n°1517747
antp
Super Administrateur
Champion des excuses bidons
Posté le 21-02-2007 à 15:58:34  profilanswer
 

Ça dépend un peu de ce que tu veux faire...  
En général on rajoute juste le nom du fichier .pas (sans le .pas) dans la liste des "uses". Soit tout au début si son contenu est nécessaire pour les déclarations de types, soit dans "implementation" si c'est juste pour y faire appel dans tes fonctions/procédures.
Le $I c'est pour des fichiers .inc, pour des "conditional defines" en général.

n°1517860
HERIBERT
Posté le 21-02-2007 à 17:31:44  profilanswer
 

antp a écrit :

Ça dépend un peu de ce que tu veux faire...  
En général on rajoute juste le nom du fichier .pas (sans le .pas) dans la liste des "uses". Soit tout au début si son contenu est nécessaire pour les déclarations de types, soit dans "implementation" si c'est juste pour y faire appel dans tes fonctions/procédures.
Le $I c'est pour des fichiers .inc, pour des "conditional defines" en général.


Salut , Antp :hello: Le roi du Delphi :jap:  
Ca fait un biout de temps que je ne t'avais pas vu par ici !
 
Donc, ce sera ds Implementation. Si c'est là, en principe, mes variables devraient être "visibles" par les procédures imlplémentées ds le fichier contenant la directive Include.  
 
Ce quui devrait donner ceci :
 
var
  Form1: TForm1;
 
  Nom_Fichier : string;  
  etc  (autres variables globales)
   
 
implementation
 
 
{$R *.dfm}
 
Include page_truc   // et sans ".pas"
 
procedure machin(Chaine : string);
begin
end;
 

 
Je vais l'essayer.

n°1518167
antp
Super Administrateur
Champion des excuses bidons
Posté le 22-02-2007 à 10:50:59  profilanswer
 

"uses", pas "include" :o
 
En effet ça faisait longtemps que je n'avais plus posté par ici, je passe moins souvent sur HFR et j'oubliais de vérifier les nouveaux topics Delphi.


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  [D6] include : quelle syntaxe ?

 

Sujets relatifs
syntaxe jointure externe oracleErreur de syntaxe MYSQL
requête sql+php: problème de syntaxeHelp !! Erreur de syntaxe sur macro Catia V5R16
problème de syntaxepasser un parametre avec un include
[résolu] Ajax et erreur de syntaxe[REGLE] Problème d'include
error: erreur de syntaxe before numeric constant ???syntaxe C++ que je ne comprends pas
Plus de sujets relatifs à : [D6] include : quelle syntaxe ?


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR