Handle Problem

[braingrenade]

Moin Leute !

Ich hab eine prozedur in einer
unit :

Delphi-Quellcode:

type myclass = class
 targethandle : HWND;
 procedure init(windowhandle : HWND);
  ...
end;

...

procedure myclass.init(windowhandle : HWND);
begin
targethandle := windowhandle; // in dieser zeile  kommt der fehler
...
end;

nun möchte ich diese prozedue in einer form so ausführen :

Delphi-Quellcode:

var x : myclass;

procedure y;
begin
x.init(application.handle);
end;

aber es kommt währen der laufzeit immer zu folgendem Fehler :

'access violation at address 0046280E in modul ...'

Weiß jemand wie das beheben kann ?