Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.17;
Скачать: CL | DM;

Вниз

Как отследить нажатие кнопки мыши в MouseMove?   Найти похожие ветки 

 
jiurajhgjhgty   (2004-02-06 20:13) [0]

Непонятно в чем ошибка?Коммпилятор выдает ошибку говоря что несоответствие типов.Почему?
procedure TForm1.Button1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
If Shift=ssLeft then
....
end;


 
Тимохов ©   (2004-02-06 20:14) [1]

ssleft in shift


 
Юрий Зотов ©   (2004-02-06 20:15) [2]

Ошибка в том, что "множество" и "элемент множества" - вещи разные.

if Shift = [ssLeft] then...
if ssLeft in Shift then...



Страницы: 1 вся ветка

Текущий архив: 2004.02.17;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.019 c
1-53643
VID
2004-02-06 17:08
2004.02.17
Определить необходиму высоту для RichEdit


9-53351
miek
2003-07-28 10:31
2004.02.17
2D-движок: релиз


3-53395
phpist
2004-01-22 19:13
2004.02.17
Обновление BLOB-полей в ZeosDB


1-53468
able
2004-02-05 20:18
2004.02.17
Сервисы.


1-53448
Filat
2004-02-06 13:37
2004.02.17
Color= clGradientActiveCaptionю Как перевести в вид $AABBCC