Problem je sledeci, postoji jedan form na kome postoji jedan menu. U programu postoji opcija za fullscreen. Kada se program prebaci u fullscreen, menu bi trebao da nestane, ali da ostane aktivan, tj. da svi shortcut-ovi i dalje rade. Mogu da napisem:
Form1.Menu:=Nil;
I naravno, menu ce nestati, ali ce i shortcutovi prestati da funkcionisu. Inace mainmenu nema opciju Visible koju bih prosto mogao da iskljucim. Zna li neko kako moze da se napravi "invisible menu" ?
procedure TForm1.Button1Click(Sender: TObject);
var i: integer;
begin
for i := 0 to MainMenu1.Items.Count - 1 do
TMenuItem(MainMenu1.Items[i]).Visible := False;
end;
Mene također muči menu. Nedavno sam napravio da mi miš (pokazivač) nestane nakon što se ne miče 5 sekundi. No pomicanjem preko menija miš nestane iako to ja ne želim. Naime svakim pomakom preko ostalih kontrola bi se resetirao timer ali MEne nema MouseMove Event?! Kako ću to drugačije izvesti?
namesti timer na tih 5 sec i pri svakom OnTimer uzimaj poziciju kursora i belezi je u neku varijablu (dve varijable) i poredi sa prethodnom pozicijom... ako je pozicija ista, onda se mis nije pomerio
pazi, postoji mogucnost da nekim sluchajem ti pomerish misha pa ga vratish na isti piksel posle 5 sekundi, ali to ce teeeeeeeeeeeskooooooo da se desi...