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

Вниз

HELP!!!!!   Найти похожие ветки 

 
Rammst   (2002-04-11 07:36) [0]

Привет All! Очень нужна помощь!
R1:=PChar(OpenDialog1.FileName);
R2:=PChar(OpenDialog2.FileName);
R3:=PChar(OpenDialog3.FileName);

Это находиться в Unit2.
А в Unit1 у меня вот что:
PlaySound(R1,0,SND_ASYNC);
То работает, то не работает!
В чем ошибка?


 
Anatoly Podgoretsky   (2002-04-11 07:51) [1]

А в unit1 указал, что используешь unut2


 
Rammst   (2002-04-11 08:00) [2]

Да, указан модуль для PlaySound.


 
Гарик   (2002-04-11 09:58) [3]

после этой строчки
R1:=PChar(OpenDialog1.FileName);
в R1 хранится указатель на первый элемент OpenDialog1.FileName.
Если OpenDialog1 не существует, тогда там будет мусор.


 
Anatoly Podgoretsky   (2002-04-11 10:30) [4]

Как объявлены Rx?


 
REA   (2002-04-11 10:32) [5]

А еще там есть доп. флажки - прекратить уже звучащий звук и т.п.


 
Armen   (2002-04-15 15:03) [6]

R1:=StrNew(PChar(OpenDialog1.FileName));
...
...
StrDispose(R1);


 
VEG   (2002-04-15 17:15) [7]

Попробуй PlaySound(R1,SND_ASYNC);


 
VEG   (2002-04-15 17:18) [8]

Или PlaySound(R1,SND_ASYNC or snd_Memory);



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

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

Наверх




Память: 0.45 MB
Время: 0.006 c
1-94515
Lena Z
2002-04-16 16:42
2002.04.29
L470


1-94477
User_OKA
2002-04-15 10:23
2002.04.29
Реестр


14-94545
kaif
2002-03-21 23:45
2002.04.29
Кто какие предложения вынужден отвергать?


14-94540
lipskiy
2002-03-21 01:52
2002.04.29
Forms and controls in runtime


1-94496
Reals
2002-04-16 17:30
2002.04.29
Как написать плугин для Outlook Express и internet Explorer...





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский