comment mettre une fonction en parametre d'une fonction en pascal ?
comment mettre une fonction en parametre d'une fonction en pascal ? - Programmation
Marsh Posté le 18-11-2001 à 15:11:53
type
TTaFonction = function(Unparam: Integer):Boolean;
procedure TonTrucAppele(Fonction: TTaaFonction);
begin
Fonction(4);
end;
function Test(Unparam: Integer):Boolean;
begin
result := Unparam>4;
end;
begin
TonTrucAppele(Test);
end;
Ca devrait pas etre trop loin, ca compile pas terrible dans le forum ;-)
---------------
Vendredi c'est Buitoni
Marsh Posté le 18-11-2001 à 15:13:00
Ah, j'ai oublié de te dire, si c'est une fonction d'une classe que tu lui passes, tu dois la déclarer comme ca:
type
TMachinChose = function(Foo: Integer):Integer of object;
Voila...
---------------
Vendredi c'est Buitoni
Sujets relatifs:
- Pascal objet vs C/C++ VS VB : je sens le troll, mais quand même...
- [C] Mettre de l'echo dans un fichier .wav
- [ASP] mettre juste un mot en commentaire
- [Visual Basic Excel] Pb de retour de paramètre dans une focntion
- Bon, ben finalement, je v me mettre au delphi 6
- jarrive pas a bien freer une fonction
- PASCAL : exo super relou :(
- j'ai bien envie de mettre du son dans mes progs c++ moi :)
- [VC++] Déclaration et appel d'une fonction callback
- [SQL server] Passer un tableau en parametre d'une procédure stocké?
Marsh Posté le 18-11-2001 à 14:11:27
???