Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Desni taster misa

[es] :: Pascal / Delphi / Kylix :: Desni taster misa

[ Pregleda: 1785 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

erekoz
John Doe
Beograd

Član broj: 5960
Poruke: 148
*.tvmetropolis.com



Profil

icon Desni taster misa07.10.2003. u 11:30


Pozdrav svima prisutnima,

Kako da napravim da desni tasterom misa na stavku u listboxu izadje prozor sa raznim opcijama?

unapred zahvalan, erekoz
07.10.2003. u 11:30 

erekoz
John Doe
Beograd

Član broj: 5960
Poruke: 148
*.tvmetropolis.com



Profil

icon Re: Desni taster misa07.10.2003. u 11:30

izvinite, kako da napravim da KLIKOM na desni taster misa...
07.10.2003. u 11:30 

-zombie-
Tomica Jovanovic
freelance programmer
ni.ac.yu

Član broj: 4128
Poruke: 3448
217.26.66.*

Sajt: localhost


Profil

icon Re: Desni taster misa07.10.2003. u 12:23
Laptopovi

imaš onMouseDown i onMousePress i još par onMouseXXX događaja. u parametrima funkcije šalju i koje je dugme pretisnuto, pa ispitaj da li je to drugo dugme, pa prikaži neku formu sa Form2.ShowModal...
07.10.2003. u 12:23 

goblin
Milan Aleksic
Gtech Belgrade, Sofware Engineer II
Beograd

Član broj: 4055
Poruke: 85
*.ptt.yu

Jabber: milanaleksic@gmail.com
Sajt: www.milanaleksic.net


Profil

icon Re: Desni taster misa07.10.2003. u 12:27
Ako ti treba podmeni, pogledaj OnContextPopup.
Ako ti ne trebba to, pogledaj OnMouseUp i mbRight u Button parametru eventa (samo obradi da li je mis ostao u granicama kontrole).
Ako ti ni ovo nije dovoljno, procunjaj kroz VCL pa gledaj kako su oni obradili click event pa ga ti primeni (samo prepravi da bude sa desnim dugmetom) u svojoj komponenti...
Evo ti na primer kako je to u TControl za levo dugme:
Code:

procedure TControl.WMLButtonUp(var Message: TWMLButtonUp);
begin
  inherited;
  if csCaptureMouse in ControlStyle then MouseCapture := False;
  if csClicked in ControlState then
  begin
    Exclude(FControlState, csClicked);
    if PtInRect(ClientRect, SmallPointToPoint(Message.Pos)) then Click;
  end;
  DoMouseUp(Message, mbLeft);
end;


A sto se tice izlaska forme, pusti mastu na volju! Ja ti ipak ne bi preporucio da ides sa ShowModal, vec samo sa Show (sa prepodesenom lokacijom gornjeg levog ugla) i cim oseti OnExit da je ponovo sakrijes... nisam nikad pokusao ali trebalo bi da je ovako...

Pozdrav

P.S. Bez muke nema nauke :)
Don't try to impress me... I'm good !
07.10.2003. u 12:27 

erekoz
John Doe
Beograd

Član broj: 5960
Poruke: 148
*.tvmetropolis.com



Profil

icon Re: Desni taster misa07.10.2003. u 12:32

"P.S. - Bez muke nema nauke "...

vazda bilo, vazda bilo...
07.10.2003. u 12:32 

[es] :: Pascal / Delphi / Kylix :: Desni taster misa

[ Pregleda: 1785 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.