
11.08.2009, 07:53
|
 |
Специалист
|
|
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
|
|
Код:
if gizmo.SelectedObj<>nil
then if Shift=[ssRight]
then
begin
X:=555;
x:=5;
end
else x:=1
else // а тут будет для первого условия
__________________
Поживу - увижу, Доживу - узнаю, Выживу - учту. 
[P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|