Help

e, drustvo jedno pitanje (kao i svi ostali) :o))
imam sledeci problem. Kreiram meni (menu bar) i imam i neki status bar na dnu koji naravno podrzava ispis texta (cisto da opisem radne uslove :o)) kako da kada misem dodjem na neku komponentu menija (u vreme izvrsavanja programa) da ispisem dole u status bar-u neki text. Recimo kada samo otvorim File, pa dodjem na Exit, on da ispise dole ("Exits the program"). Nikako da nadjem foru, posto na meniju nema Property OnMouseOver. Aj, kome je jasno sta hocu nek' svrljne , kome nije isto, pa cu da objasnim
Caos

Potpis

"Black holes are where God divided by zero."
- Steven Wright

Dodaj na formu mainmenu i statusbar. Definisi stavke menija i njihove hintove. Promeni vrstu statusbar-a u simplebar ako hoces da koristis simpletext za ispis hint-a.

U OnCreate event forme dodaj ovo:

Application.OnHint := mojhint;

U public dodaj ovo:

procedure mojhint(Sender: TObject);

U implementation dodaj ovo:

procedure TForm1.mojhint(Sender: TObject);
begin
StatusBar1.SimpleText := Application.Hint;
end;


Definisi hint neke stavke u meniju (preko property editora) i isprobaj kako radi.