déclaration d'une fonction

Question

Je désire déclarer la fonction:
function trouver_composant(t:string):Tcompo
pour quelle soit visible dans les autres unités.
Je la déclare donc dans la partie Interface.

Le compilateur me renvoit:
[Erreur] Unit2.pas(64): Déclaration forward ou external non satisfaite: 'TForm2.trouver_composant'

Je suis un peu perdu à ce niveau là si quelqu'un peut me filer un coup de main
Merci !

DelphiCool · Answer

Si ton unité qui contient la fontion sappelle Ufonction.pas

tu met dans ton projet et sous implementation :

  uses Ufonction;

Mais apparement  cé un probleme autre que tu as

si la fonction qui est dans ton unité fait reference à un Objet de ton projet

alors faut que tu fasse la meme chose dans ton Ufonction et sous implementation, Mais tu y met le nom dde l'unitée qui est concernée

cs_Jos · Answer

Dans ta form contenant ta fonction, tu dois la déclarer normallement, comme toute autre fonction.

Et, comme Delphicool te le disait, pour l'utiliser dans une autre form, sous implementation, tu mets
uses ta_form_contenant_la_fonction;

cs_vib · Answer

Bon a priori  ca marche.
En faite, j'avais déclaré la fonction au niveau type d' interface pensant qu'il fallait déclaré 
là pour qu'elle soit visible pour les autres forms. Mais il fallait la déclaré juste avant  'implementation.
C'est un peu obscure ds ma tete, mais ca va venir.
Merci encore

cs_vib · Answer

Bon a priori  ca marche.
En faite, j'avais déclaré la fonction au niveau type d' interface pensant qu'il fallait déclaré 
là pour qu'elle soit visible pour les autres forms. Mais il fallait la déclaré juste avant  'implementation.
C'est un peu obscure ds ma tete, mais ca va venir.
Merci encore

cs_Teardrop · Answer

Pour les déclarations de fonctions/procedures, y a plusieures possibilités:
1°
si la fonction/procedure est déclarée dans public ou private, il faut précéder le nom de la fonction par le nom de la form
ex:
public
   function TForm1.MaFonction(arguments): retour;

2°
déclarer la fonction/procedure avant implementation et là TForm1 est facultatif

En clair si tu declare ta fonction dans type et que t'as le message 'Déclaration forward ou external non satisfaite' soit t'as mal orthographié la fonction dans implementation soit t'as pas mis le TForm1 devant le nom de la fonction.

cs_Teardrop · Answer

J'oubliais:
pour y acceder depuis une autre unité, déclarer l'unité qui contient la fonction dans les uses.

cs_Teardrop · Answer

Désolé, je me suis embrouillé tout seul :)
je te mets un exemple:
si tu écris ca
  public
    { Public declarations }
    procedure RegStr(Sender: TCheckBox; root: HKEY; key: String; val: String);

dans implementation il faut mettre
implementation

{$R *.dfm}

procedure TfrmMain.RegStr(Sender: TCheckBox; root: HKEY; key: String; val: String);
var reg: TRegistry;
begin
     { code }
end;

Désolé si c'est confus.

Déclaration d'une fonction

7 réponses

Votre réponse

Discussions similaires