Lien entre les unités?Résolu

Question

Bjr,

Je commence a programmer en delphi, je voulais savoir comment on apppelle une procedure d'une unit" dans une autre unit&#233;. Merci

Filipe35 · Accepted Answer

unit Unit1;


 


interface


 


uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, unit2, StdCtrls;


 


type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { D&#233;clarations priv&#233;es }
  public
    { D&#233;clarations publiques }
  end;


 


var
  Form1: TForm1;


 


implementation


 


{$R *.dfm}


 


procedure TForm1.Button1Click(Sender: TObject);
begin
  bob;
end;


 


end.



-------------------------------- 


 


unit Unit2;


 


interface


 


uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;


 


   procedure bob();  // moubli pas !


 


implementation


 


 


 


procedure Bob();
begin
  Showmessage ('kikou');
end;


 


end.

C tout @+ 
 
bonne prog

Fililpe

Filipe35 · Answer

Salut,

Unit1;
Uses Unit2; // a rajouter

mon boutonClick //  par exemple
MaProc&#233;dureDeUnit2 (variableSiYa);
end;

Unit2;

MaProc&#233;dureDeUnit2 (bob:integer); // si aucune Var a transmettre: ()

c tt 

Bonne prog 

Filipe

XgaletteX · Answer

En faite le truc, c ke g un bouton sur ma premi&#232;re fiche qui affiche la seconde, et je voudrai kavec une second bouton sur la premi&#232;re fiche appell&#233; une procedure de la seconde, g dja mis uses unit2, mais il me dis kil ne conn&#233; pas la proc&#233;dure de la fiche 2.

Lien entre les unités?

3 réponses

Votre réponse

Discussions similaires