Deutsches Lazarusforum

The following Code works for Windows (7) (thx to everybody who has contributed to what I 'borrowed' from here!):

Der folgende Code funktioniert bei mir unter Windoof (habe ich mir von hier zusammengeklaut, danke an alle Poster!):

procedure TForm1.FormCreate(Sender: TObject);
var
Rgn : HRGN ...