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 
|