Type-Syntax-Erklärung

[SebE]

Hi.

Wer kann mir diesen Code erklären?
Wie kann ein Typ eine Prozedur sein?

Code:

type
THTMLParseProc = procedure(const HTMLData: string; TagType: TTagType; Parameters: TStrings);

und was muss ich als Parameter, die vom Typ THTMLParseProc sind, eingeben?

Code:

procedure ParseHTML(const HTML: string; ParseProc: THTMLParseProc)

Kann jemand helfen - danke

[mirage228]

Hi,

Ein Typ weist den Compiler darauf hin, dass es sich um den exakt selben Datentyp handelt. (Beispiel: TNotifyEvent).

Als Parameter musst Du eine Prozedur (ohne Parameterklammern) übergeben.

mfG
mirage228

[SebE]

Danke schön

[Oxmyx]

Das ist ein Funktionszeiger. So wie ein normaler Zeiger auf eine Variable zeigen kann, zeigt ein Funktionszeiger auf eine Funktion. Der Unterschied ist, dass man einer Funktion auch noch Parameter übergeben kann, deshalb muss der Funktionszeigertyp nach folgendem Muster deklariert werden:

Delphi-Quellcode:

type
  PFunction = function(a: Integer): Integer;
  PProcedure = procedure(a: Integer);

Dann musst du eine Funktion haben, die deren Parameterliste der des Funktionszeigers in Typ und Reihenfolge entspricht. Dann musst du den Funktionszeiger auf die Funktion zeigen lassen, und du kannst fortan mit dem Funktionszeiger die Funktion aufrufen.

Delphi-Quellcode:

type
  PAddFunc: function(a, b: Integer): Integer;

function Add(a, b: Integer); Integer;
begin
  Result := a + b;
end;

procedure Main();
var
  AddFunc: PAddFunc;
  i: Integer;
begin
  AddFunc := @Add;
  i := AddFunc(4, 5);
end;