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

Вниз

Соединение программ-2   Найти похожие ветки 

 
Abu   (2002-05-21 19:19) [0]

Ребята, подскажите еще. Программа с помощью ShellExecute вызывается - все отлично, но первую прогу - вызывающую, никак не могу скрыть - программы выполняются параллельно. Form1.Visible:=False; или Form1.Hide не помогают.


 
Song   (2002-05-21 19:24) [1]

Вы из вызываемой программы пытаетесь скрыть вызывающую?


 
Abu   (2002-05-21 19:36) [2]

Да, т.е. пока работает вызаваемая, вызвавшей ее не должно быть видно.


 
Song   (2002-05-21 19:51) [3]

Перед ShellExecute сделайте:
Form1.Hide;
Application.ProcessMessages;


 
Abu   (2002-05-21 20:01) [4]

Song ©

Не помогает


 
Song   (2002-05-21 20:04) [5]

Тект программы приведите


 
Abu   (2002-05-21 20:19) [6]

По нажатию кнопки (OnClick) должна вызываться программа WorkP:

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
Form1.Hide;
Application.ProcessMessages;
ShellExecute(0,nil,"WorkP.exe",nil,nil,SW_SHOWNORMAL);
Form1.Show;
end;


 
Song   (2002-05-21 20:23) [7]

Дык понятно... у Вас она прячется и сразу показывается... :)) надо ждать до тех пор пока прога workp.exe не закончяит свою работу. Сделать это можно используя WaitForSingleObject() или TShellExecuteInfo


 
Abu   (2002-05-21 20:42) [8]

Спасибо.



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

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

Наверх





Память: 0.45 MB
Время: 0.005 c
3-6917
Катерина
2002-05-13 12:35
2002.06.03
Настройка BDE в run-time


1-7084
ymin
2002-05-22 09:35
2002.06.03
Господа мастера.


1-6984
Елена
2002-05-22 15:15
2002.06.03
Модифицировать строку


6-7157
Ghost.
2002-03-21 16:58
2002.06.03
Почтовая программа по умолчанию


1-6963
KIR
2002-05-22 18:02
2002.06.03
Форматирование текста в ячейках StringGrid a





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