/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Overføre funktion som parameter
Fra : Michael Vilhelmsen


Dato : 19-09-03 11:52

Hej

Jeg syntes at kunne erindre, at man kan overføre en procedure / funktion som
parameter til en anden procedure / funktion.
Men om jeg kan få det til at virke i Delphi 5 !

F.eks. har jeg en procedure, som gør dette:

function TfrmMain.SetCardDate (Const PCord : String) : Integer;
begin
AddLine('Kort: '+PCord);
Result := 1;
end;


AddLine putter en linie i et memofelt.


Jeg har så en anden funktion fra en DLL fil, som forventer følgende:

procedure Tflxcom.flxInitCallback(method_id: FLX_CALLBACK; method_ptr:
Integer);

Dvs. den sidste parameter er en pointer til en procedure / funktion (hvis
jeg tolker det korrekt).

Michael



 
 
Finn Bindeballe (19-09-2003)
Kommentar
Fra : Finn Bindeballe


Dato : 19-09-03 15:01

hej der.......

>procedure Tflxcom.flxInitCallback(method_id: FLX_CALLBACK; method_ptr:
>Integer);
>
>Dvs. den sidste parameter er en pointer til en procedure / funktion (hvis
>jeg tolker det korrekt).
>
>
>
jeps...det er rigtigt.. Du skal bare huske at den function du vil kalde
skal være >stdcall; <
eks.
function etellerandeet( n:integer) : integer; stdcall;
blablalba

/finn


Søg
Reklame
Statistik
Spørgsmål : 177459
Tips : 31964
Nyheder : 719565
Indlæg : 6408191
Brugere : 218881

Månedens bedste
Årets bedste
Sidste års bedste