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

TShiftState je nekompatibilan uvek

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

[ Pregleda: 435 | Odgovora: 1 ]

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

mihaylo
Mihajlo Zekovic
NS

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

Sajt: M3.CO.SR


Profil

icon TShiftState je nekompatibilan uvek30.12.2006. u 20:37

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?
30.12.2006. u 20:37 

morlic
Milos Orlic
Beograd

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



Profil

icon Re: TShiftState je nekompatibilan uvek30.12.2006. u 21:35
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);
30.12.2006. u 21:35 

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

[ Pregleda: 435 | Odgovora: 1 ]

Postavi temu Odgovori

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