KAKO DA – otvaranje pop-up menija bilo kojim OnClick događajem

• KomBib
• Saveti
• KAKO DA – otvaranje pop-up menija bilo kojim OnClick događajem

Kategorija: Savet :: Datum: 2008-06-21

Pregleda(30 dana/ukupno): 15 / 835

Ponekad je korisnicima aplikacija potrebno omogućiti poziv Pop-Up menija klikom na neko dugme, posebno u slučajevima kada korisnici nisu dovoljno obučeni.

Ponekad je korisnicima aplikacija potrebno omogućiti poziv Pop-Up menija klikom na neko dugme, posebno u slučajevima kada korisnici nisu dovoljno obučeni.

Kontrola TPopupmenu i kontrole koje poseduju mogućnost “desnog-klika” predstavljaju dobro rešenje za sve korisnike. Međutim, ponekad korisnici aplikacija ne znaju da imaju mogućnost korišćenja desnog klika, pa je tada dobro da pop-up meni pozovemo klikom na neki dugmić ili sličnu kontrolu. Korišćenjem metode OtvoriPopUp() koju ćemo vam predstaviti u narednim redovima, moćićete da otvorite bilo koji pop-up meni iz bilo kog dela obrade događaja OnClick, bilo koje kontrole u vašoj aplikaciji. Potrebno je samo da programski kôd sličan ovom dole smestite u obradu događaja Click.

Programski kôd

procedure TForm1.Button1Click(Sender:TObject);
begin
OtvoriPopUp(Sender,PopUpMenu1);
end;

Procedure OtvoriPopUp(TheControl:Tobject; PopMenu:TPopMenu);
var
p:TPoint;
r:TRect;
begin
If (TheControl Is TButtonControl) Then
Begin
// smeštanje pop menija na dno dugmića
GetWindowRect(TButtonControl(TheControl).handle,r);
p.x:=r.Left;
p.y:=r.Bottom;
End Else Begin
GetCursorPos(p);
End;
Popmenu.Popoup(p.x, p.y);
End;

Pripremio: Milenko Kusurović

MI IMAMO KNJIGU ZA VAS:

Java 2, JDK 5 od početka
Cena: 3,262.00 RSD

Iz moje beležnice
Cena: 1,296.00 RSD

Život na razglednici
Cena: 790.00 RSD

Komentari:

Budite prvi koji će ostaviti komentar