Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#12

Re: funktion aufrufen deren namen in einem string steckt

  Alt 5. Jul 2009, 17:42
Zitat von griever:
nur wie komme ich jetzt mit den namen der variablen im string an deren inhalt?
siehe oben


Delphi-Quellcode:
type TMyFunc = function(b: Byte);
  TMyArray = array of record
    name: String;
    func: TMyFunc;
  end;
var a: TMyArray;

function TestFunc(b: Byte);
begin
end;


SetLength(a, 1);
a[0].name := 'Test';
a[0].func := TestFunc; // 1

for i := 0 to High(a) do
  if a[i].name = {'Test'} then begin
    x := a[i].func({123});
    Break;
  end;
1: falls sich da wer wundert, daß dort nicht @TestFunk steht ... Delphi erkennt, daß Links ein Funktionszeiger erwartet wird und weiß, daß ich den Zeiger zur Funktion zuweisen will.
$2B or not $2B
  Mit Zitat antworten Zitat