Treba da radi. Windows ne dozovljava kada je bsDialog, ali sa bsSingle treba da radi. Prvo probaj da stavis na bsSizeable i vidi radi li. Ako ne radi probaj da stavis neko dugmence na formu i da na OnClick() stavis:
Code:
procedure TForm1.Button1Click(Sender: TObject);
begin
if Menu=MainMenu1 then
ShowMessage('Sve je ok!')
else
ShowMessage('Nesto nije dobro!')
end;
Ako ti radi sa bsSizeable i imas noviji Delphi (>=6) onda ostavi na bsSizeable ali postavi Constrains na zeljenu vrednost tako da fakticki zakljucas izmenu velicine forme.