>>530
BorderStyle := bsNone;
WindowState := wsMaximized;

にすればフルスクリーンになります。