Привет всем!
Дело тут такое: с помощью своей программы я запускаю игру, игра входит в полноэкранный режим и сразу же выходит, а моя программа становиться активной. Мне надо чтоб запустить игру и звбыть про прогу, самое главное чтоб игра не выходила.
Помогите плз
Запуск игры
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 9
• Страница 1 из 1
- Zoomie
- Продвинутый пользователь
-
- Сообщения: 181
- Зарегистрирован: 10.05.2004 (Пн) 10:07
- Откуда: СПб
Запуск игры
Zoomie » 18.12.2005 (Вс) 16:12
- JohnK
- Постоялец
-
- Сообщения: 874
- Зарегистрирован: 03.08.2002 (Сб) 0:35
- Откуда: 48.02` 37.58`
JohnK » 19.12.2005 (Пн) 13:05
А ты так запускал?
If FileExist(s(3)) Then
n = ShellExecute(0, vbNullString, FilePath, vbNullString, Left$(CurDir$, 1), 1)
If n > 32 Then
tempStr = tempStr & "OK"
Else
tempStr = tempStr & "Err"
End If
Else
tempStr = tempStr & "Err"
End If
If FileExist(s(3)) Then
n = ShellExecute(0, vbNullString, FilePath, vbNullString, Left$(CurDir$, 1), 1)
If n > 32 Then
tempStr = tempStr & "OK"
Else
tempStr = tempStr & "Err"
End If
Else
tempStr = tempStr & "Err"
End If
SELECT * FROM girls WHERE tits NOT NULL AND age BETWEEN 18 AND 25 ORDER BY Beauty
- Zoomie
- Продвинутый пользователь
-
- Сообщения: 181
- Зарегистрирован: 10.05.2004 (Пн) 10:07
- Откуда: СПб
Zoomie » 19.12.2005 (Пн) 17:45
Я пишу вот так:
Не пашет...
Совсем не запускается
- Код: Выделить всё
n = ShellExecute(0, vbNullString, App.Path & "/main.exe /connect /u" & txtURL.Text & " /" & txtPort.Text, vbNullString, Left$(CurDir$, 1), 1)
If n > 32 Then
tempStr = tempStr & "OK"
Else
tempStr = tempStr & "Err"
End If
Не пашет...
Совсем не запускается
- BV
- Thinker
-
- Сообщения: 3987
- Зарегистрирован: 12.09.2004 (Вс) 0:55
- Откуда: Молдавия, г. Кишинёв
BV » 19.12.2005 (Пн) 18:27
Ужас, как такое написать в голову пришло?
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
- Zoomie
- Продвинутый пользователь
-
- Сообщения: 181
- Зарегистрирован: 10.05.2004 (Пн) 10:07
- Откуда: СПб
Zoomie » 19.12.2005 (Пн) 18:30
Ага! Всё получилось!
При использовании shellaexecuta надо указывать еще текущую дерикторию.
У меня получилось так:
При использовании shellaexecuta надо указывать еще текущую дерикторию.
У меня получилось так:
- Код: Выделить всё
n = ShellExecute(0, vbNullString, "С:/muonline-97/losena.ru/main.exe", " /connect /u" & txtURL.Text & " /" & txtPort.Text, "D:/muonline-97/losena.ru/", 1)
Сообщений: 9
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot и гости: 179