Discussion :

[saidus]

Bonjour ..!!!
je suis debutant en Pascal Objet et j'aimerai bien savoir comment declarer un pointeur de fonction ( pas une fonction qui renvoi un pointeur )

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
      // Exemple en C 
      ISC_STATUS	(* ctl_source)();
      // Ex 2 
     short (*blob_get_segment)(void* hnd, ISC_UCHAR* buffer, ISC_USHORT  buf_size,ISC_USHORT* result_len);

merci pour votre aide

[tourlourou]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
type
  TMyProc = procedure(AParam: integer);
 
var
  MyProc: TMyProc;
 
procedure Proc1(AParam: integer);
begin
  ShowMessage(IntToStr(AParam));
end;
 
begin
  MyProc:=Proc1;
  MyProc(3);
end;