Форум: "Начинающим";
Текущий архив: 2007.03.25;
Скачать: [xml.tar.bz2];
ВнизКак предотвратить н-й запуск приложения? Найти похожие ветки
← →
Магедон (2007-03-02 18:24) [0]Я написал маленький почтовый клиентик. Поставил его поумолчанию.
Когда я я кликаю где, на mailto:lkjlkj@kkjhk.jklsjd.idslkjf.cn то открывается новая копия программы.
Что нужно сделать чтобы винда передавала уже запущеной копии, а не запускала новую?
А если кто покажет какой иходник, то вооще было бы замечательно.
← →
Рамиль © (2007-03-02 18:31) [1]Винда не передаст уже запущенной копии.
Должна передавать новая копия твоей программы и закрываться.
← →
YurikGL © (2007-03-03 00:36) [2]http://itby.ru/content/view/2064/40/
http://read.excode.ru/art4026.html
и вообще
http://www.yandex.ru/yandsearch?rpt=rad&text=%EA%EE%EF%E8%FF+%EF%F0%E8%EB%EE%E6%E5%ED%E8%FF+delphi
← →
Alexdeil (2007-03-03 17:10) [3]Примерно так (главный модуль программы):
program proba;
uses
Windows,
Forms,
main in "main.pas" {fMainb};
var
Handle1 : LongInt;
Handle2 : LongInt;
{$R *.RES}
begin
Application.Initialize;
Handle1 := FindWindow("TfMainb",nil);
if handle1 = 0 then
begin
Application.CreateForm(TfMainb, fMainb);
Application.Run;
end
else
begin
Handle2 := GetWindow(Handle1,GW_OWNER);
//Чтоб заметили :)
ShowWindow(Handle2,SW_HIDE);
ShowWindow(Handle2,SW_RESTORE);
SetForegroundWindow(Handle1); // Активизируем
end;
end.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.03.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.047 c