Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2004.05.23;
Скачать: [xml.tar.bz2];

Вниз

Интересный кусок в кодах VCL   Найти похожие ветки 

 
Daniel   (2004-05-02 21:11) [0]


 if FDeviceType <> dtAutoSelect then
   FFlags := FFlags or mci_Open_Type;

 if FDeviceType <> dtAutoSelect then
   FFlags := FFlags or mci_Open_Type
 else
   FFlags := FFlags or MCI_OPEN_ELEMENT;


Здесь заложен глубокий смысл, которого я, очевидно, не понимаю, или это просто описка?

P.S. Модуль MPlayer.pas, строка 841  (Delphi 7)


 
Rouse_ ©   (2004-05-02 21:17) [1]

:)
Действительно, есть такое :)
Даже в шестом Дельфи ...


 
DrPass ©   (2004-05-02 21:36) [2]

Думаете, программисты Borland не делают ошибок?


 
Gero ©   (2004-05-02 21:37) [3]

Возможно между второй и четвертой строкой этого кода изначально что-то было, или планировалось.
Что-то, что должно изменять значение FDeviceType.


 
Anatoly Podgoretsky ©   (2004-05-02 22:10) [4]

Д3
 
if FDeviceType <> dtAutoSelect then FFlags := FFlags or mci_Open_Type;


Д5
if FDeviceType <> dtAutoSelect then
   FFlags := FFlags or mci_Open_Type
 else
   FFlags := FFlags or MCI_OPEN_ELEMENT;


Так что предположение Gero верное


 
Apl ©   (2004-05-03 04:57) [5]

Что касается Delphi 5, то там

> if FDeviceType <> dtAutoSelect then
>    FFlags := FFlags or mci_Open_Type
>  else
>    FFlags := FFlags or MCI_OPEN_ELEMENT;

также располагается в строке 841



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

Форум: "Потрепаться";
Текущий архив: 2004.05.23;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.039 c
3-1083324280
snake1977
2004-04-30 15:24
2004.05.23
ORACLE &amp; InterBase


4-1081417029
KORN
2004-04-08 13:37
2004.05.23
DialogBox (скрытие окна)???????????????????????????


1-1083869605
Реактор
2004-05-06 22:53
2004.05.23
Выход из модального окна


1-1083943549
DDA
2004-05-07 19:25
2004.05.23
Result=PChar(s)


14-1083307555
Aplay
2004-04-30 10:45
2004.05.23
Программа обучение в ВУЗах на программиста





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский