Problem mit OnWork

[Delphi Code Anfänger]

Habe ich gerade gemacht. Kommt immer noch der selbe Fehler. Zusätzlich kommt auch noch:

E2010 Inkompatible Typen: 'TWorkMode' und 'Integer'

Diese Stelle:

Delphi-Quellcode:

procedure TDownloadThread.DoNotifyWork;
begin
  if Assigned(OnWork) then
    OnWork (Self, FWorkCount);