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

TShiftState je nekompatibilan uvek

[es] :: Pascal / Delphi / Kylix :: TShiftState je nekompatibilan uvek

[ Pregleda: 1775 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

mihaylo
Mihajlo Zekovic
mesto
NS

Član broj: 12126
Poruke: 42
*.041net.co.yu.

Jabber: neparkiraj@gmail.com
Sajt: M3.CO.SR


Profil

icon TShiftState je nekompatibilan uvek30.12.2006. u 20:37 - pre 209 meseci
U funkciji

Code:
procedure TForm1.FX1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer); 


Ne mogu da upotrebim TShiftState nikako jer sta god da napisem pise greska Incompatible types.

A kada hocu da pozovem rucno taj dogadjaj, npr.

FXChWet1MouseDown(Sender,mbLeft,ssShift,2,50);

Onda ako napisem ssShift bude: Incompatible types 'TShiftState' and 'Enumeration', a ako napisem neki broj bude: Incompatible types 'TShiftState' and 'Integer'.

Kako to da resim?
 
Odgovor na temu

morlic
Milos Orlic
Beograd

Član broj: 6081
Poruke: 735
*.dynamic.sbb.co.yu.



+1 Profil

icon Re: TShiftState je nekompatibilan uvek30.12.2006. u 21:35 - pre 209 meseci
Deklaracija procedure kaze da imas cetiri parametra, a ti kada pozivas prosledjujes pet. Znaci, to ne moze definitivno.

Plus sto pogresno saljes parametar TShiftState. Radi se o setu. Ispravno bi bilo:

FXChWet1MouseDown(Sender, [ssShift], 2, 50);
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: TShiftState je nekompatibilan uvek

[ Pregleda: 1775 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

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