Передача имени файла другой копии приложения.

@Avazart · Регистрация: 10.12.2010

Студворк — интернет-сервис помощи студентам

Суть такова программа регистрирует свое расширение файлов (.form1)
И при открытии нового файла копия приложения должно передать сообщение с именем этого файла что бы первый экземпляр приложения открыл его, а затем закрыться.

Но вот проблема: открытие второго файла выполняется не всегда, т.е сообщение не доходит
Project1.cpp

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
const char *mutexname = "mutexform1";
//---------------------------------------------------------------------------
WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
{
//------------------ Запущина ли копия программы ?----------------
        HWND  hMutex  = CreateMutex(NULL, true, mutexname);
        DWORD LastErr = GetLastError();
 
        if ((LastErr == ERROR_ALREADY_EXISTS)||
            (LastErr == ERROR_INVALID_HANDLE)||
            (!hMutex))
           {
            HWND hForm1 = FindWindow("TForm1",NULL);
 
            if(ParamCount()==1)
              {
              COPYDATASTRUCT cd;
              String text = ParamStr(1);
              cd.lpData = text.c_str();
              // Передача имени файла
              SendMessage(hForm1, WM_COPYDATA, 0, (LPARAM)&cd);
              };
            exit(1);
           }
//-----------------------------------------------------------
    try
    {
        Application->Initialize();
        Application->MainFormOnTaskBar = true;
        Application->CreateForm(__classid(TForm1), &Form1);
        Application->Run();
    }
//...

Unit1.h

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
class TForm1 : public TForm
{
__published:    // IDE-managed Components
    TRichEdit *RichEdit1;
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
private:    // User declarations
public:     // User declarations
    __fastcall TForm1(TComponent* Owner);
 
    void __fastcall OnWMCopyData(TWMCopyData &Msg);
 BEGIN_MESSAGE_MAP
     MESSAGE_HANDLER(WM_COPYDATA, TWMCopyData, OnWMCopyData);// Получение пути открываемого файла
 END_MESSAGE_MAP(TComponent);
};

Unit1.cpp

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
#include "RegExt.h" // Фунции  регистрации расширения файла в реестре
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
// Внесение расширения в реестр
RegExt(Application->ExeName,".form1","Form1",0);
// Отображение файла
if(ParamCount()==1) RichEdit1->Lines->LoadFromFile(ParamStr(1));
}
//---------------------------------------------------------------------------
void __fastcall TForm1::OnWMCopyData(TWMCopyData &Msg)
{
String File= (char*)Msg.CopyDataStruct->lpData;
 
RichEdit1->Lines->LoadFromFile(File);
}
//----------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
// Снятие регистрации расширения
//UnRegExt(Application->ExeName,"Form1");
}
//---------------------------------------------------------------------------

@vxg · 17.03.2012, 23:50

Вызов файла

@Avazart · 18.03.2012, 00:54 **[ТС]**

Первое с чем возникли трудности

C++
1
strcpy(Params.WinClassName,MAIN_FORM_CLASS);

E2034 Cannot convert 'StaticArray<wchar_t,64>' to 'char *'

Какого типа должен быть MAIN_FORM_CLASS ?

Непонятно назначение ф-ций:
ide2std(ParamStr(i));
WRITE(param_str);
READ(param_str);

@Avazart · 18.03.2012, 01:44 **[ТС]**

Из всего что мне пока удалось понять вышло вот что (см.вложение)
При запуске файла курсор меняет вид (что-то грузится), но тем не менее открытие не происходит...

@vxg · 18.03.2012, 14:00

ide2std это я так боролся с конвертацией std::string в Ansi/UnicodeString когда пытался портироваться на builder xe - вы можете конвертировать так как вам удобно или не конвертить вообще если в этом нет необходимости
READ / WRITE - это мои специфичные функции записи в поток (писались пары вида имя=значение) - вы можете просто писать так как вам удобно
вот это

Сообщение от Avazart

strcpy(Params.WinClassName,MAIN_FORM_CLA SS);

builder xe действительно делать отказался - видимо они сделали что то ужасно-несовместимое с WinClassName, я не стал особо разбираться - оставил проект на builder 6, а вообще там просто другого типа переменная-класс должна быть или я точно не понял

@Avazart · 18.03.2012, 14:17 **[ТС]**

Я попытался обойтись без всего этого- не вышло, посмотрите проект пожалуйста.

@vxg · 18.03.2012, 15:01

1 - вы ничего не присваиваете cds.cbData - система не будет знать сколько байт передавать
2 - вы не устанавливаете событие после CreateForm
3 - вы не смогли присвоить значение WinClassName - следовательно поиск окна по имени окончится неудачей (как же присвоить значение WinClassName я вам не скажу потому как не стал рыть, попробуйте навести на WinClassName и нажать F1 что бы разобраться как же они его раскурочили в builder xe)

@Avazart · 18.03.2012, 15:52 **[ТС]**

1 - вы ничего не присваиваете cds.cbData - система не будет знать сколько байт передавать
2 - вы не устанавливаете событие после CreateForm
3 - вы не смогли присвоить значение WinClassName - следовательно поиск окна по имени окончится неудачей (как же присвоить значение WinClassName я вам не скажу потому как не стал рыть, попробуйте навести на WinClassName и нажать F1 что бы разобраться как же они его раскурочили в builder xe)

1-е как пологаю должно быть

C++
1
2
 cds.cbData = strlen(File.c_str());
 cds.lpData = File.c_str();

2-е Разве не достаточно устанавливить в _tWinMain(), да и как предать h в конструктор?
3-е Не пойму зачем вообще использовать WinClassName, MAIN_FORM_CLASS почему просто не искать
HWND hwnd = FindWindow("TForm2", 0);

@vxg · 18.03.2012, 16:05

1 - да
2 - не вполне пойму о чем вы, в моем коде событие должно было быть установлено после CreateForm перед Run почему это так делается описано в той теме
3 - в принципе вы можете использовать любой удобный вам способ поиска окна. поиск по имени класса представляющего из себя GUID был выбран мной как наименее подверженный ошибкам

@Avazart · 18.03.2012, 18:39 **[ТС]**

Все понял куда вставить SetEvent(h) я просто не заметил его, работает.
Заметил что работает и без события, а также внес изменение в проект через мютекс
Project1.cpp

C++
1
2
3
4
5
COPYDATASTRUCT cd;
String text = ParamStr(1);
cd.cbData = text.Length();
cd.lpData = text.c_str();
SendMessage(hForm1, WM_COPYDATA, 0, (LPARAM)&cd); // Передача имени файла

и еще в Form1.cpp

C++
1
2
3
4
5
6
7
8
9
//---------------------------------------------------------------------------
void __fastcall TForm1::OnWMCopyData(TWMCopyData &Msg)
{
String File= (char*)Msg.CopyDataStruct->lpData;
File.SetLength(Msg.CopyDataStruct->cbData);
 
RichEdit1->Lines->LoadFromFile(File);
}
//----------------------------------------------------------------------------

Он тоже вроде нормально работает.

Добавлено через 17 минут

вроде там было так - нужно не просто зафиксировать наличие запущенной программы, но и дождаться момента когда эта программа сможет принимать сообщения, в частности, сообщение от вновь запускаемой программы с информацией о тех файлах на которых кликнул пользователь. поэтому используется событие.

А в какие моменты приложение не может принимать сообщения?

@vxg · 18.03.2012, 19:33

не может если еще форма не создана поэтому у меня эвент а не мутекс

@Avazart · 18.03.2012, 19:59 **[ТС]**

Типа такое возможно ? Это как быстро надо кликать по файлам?

Если мютекс то в таких случаях новый файл просто буде открываться на новом окне как я понимаю?

@vxg · 18.03.2012, 20:55

1 кликать на файле быстро не придется - достаточно будет выделить несколько файлов и выбрать пункт контекстного меню "открыть" - ОС начнет с бешеной скоростью запускать для каждого файла копии вашего приложения - какие-то успеют увидеть мутекс, какие-то - нет.
2 вроде да.

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

@vxg Модератор 3409 / 2184 / 354 Регистрация: 13.01.2012 Сообщений: 8,462
	17.03.2012, 23:50
	Вызов файла 1

@Avazart 8489 / 6156 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	18.03.2012, 14:17 [ТС]
	Я попытался обойтись без всего этого- не вышло, посмотрите проект пожалуйста. 0

@vxg Модератор 3409 / 2184 / 354 Регистрация: 13.01.2012 Сообщений: 8,462
	18.03.2012, 15:01
	1 - вы ничего не присваиваете cds.cbData - система не будет знать сколько байт передавать 2 - вы не устанавливаете событие после CreateForm 3 - вы не смогли присвоить значение WinClassName - следовательно поиск окна по имени окончится неудачей (как же присвоить значение WinClassName я вам не скажу потому как не стал рыть, попробуйте навести на WinClassName и нажать F1 что бы разобраться как же они его раскурочили в builder xe) 1

@vxg Модератор 3409 / 2184 / 354 Регистрация: 13.01.2012 Сообщений: 8,462
	18.03.2012, 16:05
	1 - да 2 - не вполне пойму о чем вы, в моем коде событие должно было быть установлено после CreateForm перед Run почему это так делается описано в той теме 3 - в принципе вы можете использовать любой удобный вам способ поиска окна. поиск по имени класса представляющего из себя GUID был выбран мной как наименее подверженный ошибкам 1

@vxg Модератор 3409 / 2184 / 354 Регистрация: 13.01.2012 Сообщений: 8,462
	18.03.2012, 19:33
	не может если еще форма не создана поэтому у меня эвент а не мутекс 0

@Avazart 8489 / 6156 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	18.03.2012, 19:59 [ТС]
	Типа такое возможно ? Это как быстро надо кликать по файлам? Если мютекс то в таких случаях новый файл просто буде открываться на новом окне как я понимаю? 0

@vxg Модератор 3409 / 2184 / 354 Регистрация: 13.01.2012 Сообщений: 8,462
	18.03.2012, 20:55
	1 кликать на файле быстро не придется - достаточно будет выделить несколько файлов и выбрать пункт контекстного меню "открыть" - ОС начнет с бешеной скоростью запускать для каждого файла копии вашего приложения - какие-то успеют увидеть мутекс, какие-то - нет. 2 вроде да. 1