Hallo Cyf,
dann sollte es doch so aussehen:
Delphi-Quellcode:
Type
TCP_PORT_ITEM = Record
port : Word; // Port
fp : Pointer; // Zeiger auf auszuführende Funktion
end;
var
TCP_PORT_TABLE : array[0..MAX_APP_ENTRY-1] of TCP_PORT_ITEM;
initialization
for i:=0 to 2 do
TCP_PORT_TABLE[i]:=(0,0);
Aber wo bleibt das Byte(Char) aus void(*fp)(unsigned char); // Zeiger auf auszuführende Funktion
Gruß
Thorsten