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

Вниз

Интересный кусок в кодах 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;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.036 c
1-1083826800
xman
2004-05-06 11:00
2004.05.23
MEMO


4-1080651544
BorH
2004-03-30 16:59
2004.05.23
Список Uninstall


7-1082091982
Дмитрий
2004-04-16 09:06
2004.05.23
Обновить рабочий стол


1-1083847910
BALU1111
2004-05-06 16:51
2004.05.23
Дата


9-1073226179
Zak3D[@Tm]
2004-01-04 17:22
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский