Delphi-Quellcode:
OnWorkEndMethod.Code := @FTP1WorkEnd;
OnWorkEndMethod.Data := @FFTPConnections[high(FFTPConnections)].FFTPConnction;
@FFTPConnections[high(FFTPConnections)].FFTPConnction.OnWorkEnd := TWorkEndEvent(OnWorkEndMethod);
soweit das der Richtigkeit entschpricht.....!?