1C 8.2の外部コンポーネント

はじめに

この記事では、「1C：Enterprise」システムの外部コンポーネントの動作について説明します。

「1C：Enterprise」システムバージョン8.2用の外部コンポーネントを開発するプロセスを示します。これは、作業のファイルバージョンを備えたWindowsオペレーティングシステムで実行されます。 この作業オプションは、中小企業向けに設計されたほとんどのソリューションで使用されます。 VKはC ++プログラミング言語で実装されます。

外部コンポーネント「1C：エンタープライズ」

「1C：Enterprise」は拡張可能なシステムです。 システムの機能を拡張するために、外部コンポーネント（VK）が使用されます。 開発者の観点から見ると、VCはプロパティとメソッドを持つ外部オブジェクトであり、1C：Enterpriseシステムで処理するイベントを生成することもできます。

外部コンポーネントを使用して、1C：Enterpriseに組み込まれているプログラミング言語を使用して実装することが困難または不可能な問題のクラスを解決できます。 特に、オペレーティングシステムとの低レベルの対話を必要とするタスクは、たとえば特定の機器を操作するために、このクラスに起因する可能性があります。

1C：エンタープライズシステムは、外部コンポーネントを作成するために2つのテクノロジーを使用します。

• ネイティブAPIを使用する
• COMテクノロジーを使用する

上記の2つのテクノロジー間の制限を考えると、違いはわずかであるため、ネイティブAPIを使用したVKの開発を検討します。 必要に応じて、実装された開発を適用してCOMテクノロジーを使用してVKを開発できます。また、わずかな変更を加えて、ファイル操作モード以外の作業オプションを備えた1C：エンタープライズシステムで使用できます。

VK構造

1C：Enterpriseシステムの外部コンポーネントは、DLLライブラリとして提供されます。 ライブラリコードは、IComponentBaseの下位クラスを記述しています。 作成されたクラスでは、外部コンポーネントの機能の実装を担当するメソッドを定義する必要があります。 オーバーライド可能なメソッドについては、資料の説明の過程でさらに詳しく説明します。

デモVKを起動する

チャレンジ：

1. ITSサブスクリプションで提供され、1Cの外部コンポーネントメカニズムの基本機能を示すように設計された外部コンポーネントを構築します
2. デモコンポーネントを1C構成に接続します
3. 宣言された関数の正しい機能を確認してください

編集

デモVKは、ITSサブスクリプションディスクのディレクトリ「/ VNCOMP82 / example / NativeAPI」にあります。

Microsoft Visual Studio 2008を使用してデモVKをビルドします。この製品の他のバージョンは、使用されているVisual Studioプロジェクト形式をサポートしていません。



AddInNativeプロジェクトを開きます。 プロジェクト設定では、ディレクトリをプロジェクトのビルドに必要なヘッダーファイルに接続します。 デフォルトでは、それらはITSドライブの/ VNCOMP82 / includeディレクトリにあります。

アセンブリの結果は、ファイル/bind/AddInNative.dllです。 これは、1C構成に接続するためのコンパイル済みライブラリです。

1C構成へのVK接続

空の1C構成を作成します。

以下は、マネージアプリケーションモジュールのコードです。

 ;  () ("...\bind\AddInNative.dll", "DemoVK", .Native);  = ("AddIn.DemoVK.AddInNativeExtension"); 
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

1C構成の開始時にエラーが報告されなかった場合、VKは正常に接続されています。

上記のコードを実行した結果、 DemoCompオブジェクトが構成のグローバル表示に表示されます。これには、外部コンポーネントのコードで定義されたプロパティとメソッドがあります。

組み込み機能のデモンストレーション

デモVKのパフォーマンスを確認します。 これを行うには、いくつかのプロパティを設定および読み取り、VKメソッドを呼び出し、VKメッセージを受信および処理します。

ITSディスクで提供されるドキュメントには、デモVKの次の機能が記載されています。

1. コンポーネントオブジェクトの状態を制御する
   
   メソッド： 有効化 、 無効化
   
   プロパティ： 含まれる
2. タイマー制御
   
   1秒ごとに、コンポーネントは、 コンポーネント 、 タイマーパラメーター、およびシステムクロックカウンターの行を含むメッセージを1C：Enterpriseシステムに送信します。
   
   メソッド： StartTimer 、 StopTimer
   
   プロパティ： はいタイマー
3. ShowInStatusStrokeメソッド。メソッドに渡されたテキストをパラメーターとしてステータスバーに表示します。
4. メソッドのダウンロード画像 。 指定されたファイルからイメージをロードし、バイナリデータの形式で1C：Enterpriseシステムに転送します。

これらの機能の操作性を検証します。 これを行うには、次のコードを実行します。

  ;  () (...);  = ("AddIn.DemoVK.AddInNativeExtension"); .(); (.); .(); (.); .();   (, , ) ( + " " +  + " " + ); 
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

構成を開始した結果が画像に示されています



[メッセージ]パネルには、DemoComp。Disable（）およびDemoComp。Enable（）メソッドの呼び出しの結果が表示されます 。 同じパネルの後続の行には、VCから受信したメッセージを処理した結果（それぞれSource 、 Event 、 Data）が含まれています。

外部コンポーネントの任意の名前

タスク：外部コンポーネントの名前をanyに変更します。

前のセクションでは、 AddInNativeExtension識別子を使用しましたが 、その意味は説明されていません。 この場合、 AddInNativeExtensionは拡張機能の名前です。

VCコードでは、 RegisterExtensionAsメソッドが定義されています。これは、システム内のVCを1C：Enterpriseシステムに後で登録するために必要な名前を返します。 外部コンポーネントの本質をある程度明らかにする識別子を指定することをお勧めします。

変更された拡張名を持つRegisterExtensionAsメソッドの完全なコードは次のとおりです。

 bool CAddInNative::RegisterExtensionAs(WCHAR_T** wsExtensionName) { wchar_t *wsExtension = L"SomeName"; int iActualSize = ::wcslen(wsExtension) + 1; WCHAR_T* dest = 0; if (m_iMemory) { if(m_iMemory->AllocMemory((void**)wsExtensionName, iActualSize * sizeof(WCHAR_T))) ::convToShortWchar(wsExtensionName, wsExtension, iActualSize); return true; } return false; }
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

上記の例では、VK名はSomeNameに変更されます 。 次に、VCを接続するときに、新しい名前を指定する必要があります。

  = ("AddIn.DemoVK.SomeName");
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

VKのプロパティのリストの拡張

チャレンジ：

1. VCプロパティの実装を調べる
2. 読み取りおよび書き込み可能な文字列タイプのプロパティを追加します
3. 最後のプロパティセットのデータ型を格納する文字列型の読み取り/書き込みプロパティを追加します。 プロパティ値を設定するとき、アクションは実行されません
4. 行った変更が機能していることを確認してください。

作成されたコンポーネントのプロパティを決定するには、開発者は次のメソッドをAddInNative.cppライブラリのコードに実装する必要があります。

ゲテンプロップス

この拡張のプロパティの数、0-プロパティがない場合を返します

FindProp

パラメータで名前が渡されるプロパティのシリアル番号を返します

getpropname

シリアル番号と送信された言語識別子によってプロパティの名前を返します

getpropval

指定されたシリアル番号を持つプロパティの値を返します

Setpropval

指定したシリアル番号でプロパティの値を設定します

IsPropReadable

指定されたシリアル番号を持つプロパティを読み取る機能のフラグを返します

IsPropWritable

指定されたシリアル番号を持つプロパティを書き込む機能のフラグを返します



パラメータのリストを含むメソッドの完全な説明は、ITSディスクで提供されるドキュメントに詳細に説明されています。

CAddInNativeクラスの上記のメソッドの実装を検討してください。

デモVKでは、 EnabledおよびIsTimer （ IsEnabledおよびIsTimerPresent ）の2つのプロパティが定義されています。

ライブラリコードのグローバルスコープで2つの配列が定義されています。

 static wchar_t *g_PropNames[] = {L"IsEnabled", L"IsTimerPresent"}; static wchar_t *g_PropNamesRu[] = {L"", L""};
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

ロシア語と英語のプロパティ名を保存します。 ヘッダーファイルAddInNative.hは列挙を定義します。

 enum Props { ePropIsEnabled = 0, ePropIsTimerPresent, ePropLast // Always last };
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

ePropIsEnabledおよびePropIsTimerPresentは 、それぞれ値0および1を使用して、プロパティシリアル番号を意味のある識別子に置き換えます。 値が2のePropLastを使用して、プロパティの数を取得します（GetNPropsメソッドを使用）。 これらの名前はコンポーネントコード内でのみ使用され、外部からはアクセスできません。

FindPropおよびGetPropNameメソッドは、 g_PropNamesおよびg_PropNamesRu配列を検索します 。

ライブラリモジュールにフィールド値を格納するために、CAddInNativeクラスはコンポーネントプロパティの値を格納するプロパティを定義します。 GetPropValおよびSetPropValメソッドは、それぞれこれらのプロパティの値を返し、設定します。

IsPropReadableメソッドとIsPropWritableメソッドはどちらも、アプリケーションロジックに従って渡されたプロパティのシリアル番号に応じて、 trureまたはfalseを返します。

任意のプロパティを追加するには、以下を行う必要があります。

1. g_PropNamesおよびg_PropNamesRu配列 （ AddInNative.cppファイル）に追加するプロパティの名前を追加します
2. ePropLastの前のProps列挙（ AddInNative.hファイル）で、追加されるプロパティを一意に識別する名前を追加します。
3. プロパティ値を保存するためのメモリを整理します（対応する値を保存するコンポーネントモジュールフィールドを作成します）
4. GetPropValおよびSetPropValメソッドを変更して、前の手順で割り当てられたメモリとやり取りします。
5. アプリケーションロジックに従って、 IsPropReadableおよびIsPropWritableメソッドを変更します。

パラグラフ1、2、5を明確にする必要はありません。 これらの手順の実装の詳細については、この記事の付録をご覧ください。

テストプロパティにそれぞれTestおよびType Testという名前を付けましょう。 次に、パラグラフ1の結果、次のようになります。

 static wchar_t *g_PropNames[] = {L"IsEnabled", L"IsTimerPresent", L"Test", L"TestType"}; static wchar_t *g_PropNamesRu[] = {L"", L"", L"", L""};
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

列挙の小道具は次のようになります。

  enum Props { ePropIsEnabled = 0, ePropIsTimerPresent, ePropTest1, ePropTest2, ePropLast // Always last };
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

コードを大幅に簡素化するために、STL C ++を使用します。 特に、 WCHAR文字列を使用するには、 wstringライブラリを接続します。

Testメソッドの値を保存するには、スコープのCAddInNativeクラスにプライベートフィールドを定義します。

 string test1;
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

1C：Enterpriseと外部コンポーネント間で文字列パラメーターを転送するには、1C：Enterpriseメモリマネージャーが使用されます。 彼の作品をより詳細に検討してください。 メモリの割り当てと解放には、 ImemoryManager.hファイルで定義されているAllocMemory関数とFreeMemory関数がそれぞれ使用されます。 必要に応じて、1C：エンタープライズシステムに文字列パラメーターを渡します。外部コンポーネントは、 AllocMemory関数を呼び出してメモリを割り当てる必要があります。 彼女のプロトタイプは次のとおりです。

 virtual bool ADDIN_API AllocMemory (void** pMemory, unsigned long ulCountByte) = 0;
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

pMemoryは、割り当てられたメモリのアドレスが配置されるポインタのアドレスです。

ulCountByte-割り当てられたメモリのサイズ。

文字列にメモリを割り当てる例：

 WCHAR_T *t1 = NULL, *test = L"TEST_STRING"; int iActualSize = wcslen(test1)+1; m_iMemory->AllocMemory((void**)&t1, iActualSize * sizeof(WCHAR_T)); ::convToShortWchar(&t1, test1, iActualSize);
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

文字列データ型を操作するために、 wstring_to_p関数について説明します。 パラメータとしてwstring文字列を受け取ります。 関数の結果は、埋められたtVariant構造です。 機能コード：

 bool CAddInNative::wstring_to_p(std::wstring str, tVariant* val) { char* t1; TV_VT(val) = VTYPE_PWSTR; m_iMemory->AllocMemory((void**)&t1, (str.length()+1) * sizeof(WCHAR_T)); memcpy(t1, str.c_str(), (str.length()+1) * sizeof(WCHAR_T)); val -> pstrVal = t1; val -> strLen = str.length(); return true; }
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

次に、 GetPropValメソッドのswitchステートメントの対応するcaseセクションは次の形式を取ります。

 case ePropTest1: wstring_to_p(test1, pvarPropVal); break;
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

SetPropValメソッド：

  case ePropTest1: if (TV_VT(varPropVal) != VTYPE_PWSTR) return false; test1 = std::wstring((wchar_t*)(varPropVal -> pstrVal)); break;
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

2番目のプロパティを実装するには、 CaddInNativeクラスのフィールドを定義します

 uint8_t last_type;
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

ここで、最後に送信された値のタイプを保存します。 これを行うには、CaddInNative :: SetPropValメソッドにコマンドを追加します。

 last_type = TV_VT(varPropVal);
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

ここで、2番目のプロパティの値の読み取りを要求すると、示されたタスクに必要な値last_typeを返します。

行われた変更の操作性を確認します。

これを行うには、1C構成の外観をフォームに組み込みます。

  ;  () ("...", "DemoVK", .Native);  = ("AddIn.DemoVK.SomeName"); . = 1; ((.)); . = ""; ((.)); . = ""; ((.)); ((.)); 
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

起動の結果、メッセージのシーケンスが取得されます。

3

















22







2番目と3番目のメッセージは、前の手順で設定したプロパティを読み取った結果です。 最初と2番目のメッセージには、最後に設定されたプロパティのタイプのコードが含まれています。 3は整数値、22は文字列値に対応します。 タイプとそのコードの対応は、ITSディスクにあるtypes.hファイルで設定されます。

メソッドのリストの拡張

チャレンジ：

1. 次の機能を使用して、外部コンポーネントの機能を拡張します。
2. 外部コンポーネントメソッドを実装する方法を探る
3. 関数メソッドFunkts1を追加します。これは、パラメーターとして2行（「Parameter1」および「Parameter2」）を取ります。 その結果、「Check。 パラメータ1、パラメータ2»
4. 行った変更が機能していることを確認してください。

作成されたコンポーネントのメソッドを決定するには、開発者はAddInNativeライブラリのコードに次のメソッドを実装する必要があります。

GetNMethods 、 FindMethod 、 GetMethodName

メソッドの数をそれぞれ取得し、メソッドの数と名前を検索するように設計されています。 プロパティの対応するメソッドに似ています。

Getnparams

指定されたシーケンス番号を持つメソッドパラメーターの数を返します。 この番号のメソッドが存在しないか、パラメータがない場合、0を返します

GetParamDefValue

指定したメソッドの指定したパラメーターのデフォルト値を返します

HasRetVal

戻り値の指定されたシリアル番号を持つメソッドの存在のフラグを返します。戻り値を持つメソッドの場合はtrue、そうでない場合はfalse

カラスプロ

指定されたシーケンス番号でメソッドを実行します。 メソッドがfalseを返すと、ランタイムエラーが発生し、1C：Enterpriseモジュールの実行が終了します。 パラメーターの配列のメモリーは、1C：Enterpriseによって割り当てられ、解放されます。

カラスファンク

指定されたシーケンス番号でメソッドを実行します。 メソッドがfalseを返すと、ランタイムエラーが発生し、1C：Enterpriseモジュールの実行が終了します。 パラメーターの配列用のメモリーには、1C：Enterpriseが割り当てられます。 戻り値のタイプが文字列またはバイナリデータの場合、コンポーネントはメモリマネージャのAllocMemory関数を使用してメモリを割り当て、そこにデータを書き込み、このアドレスを構造体の対応するフィールドに格納します。 1C：エンタープライズは、 FreeMemoryを呼び出してこのメ​​モリを解放します。

パラメータのリストを含むメソッドの完全な説明は、ITSディスクで提供されるドキュメントに詳細に説明されています。

上記のメソッドの実装を検討してください。

コンポーネントコードでは、2つの配列が定義されています。

 static wchar_t *g_MethodNames[] = {L"Enable", L"Disable", L"ShowInStatusLine", L"StartTimer", L"StopTimer", L"LoadPicture"}; static wchar_t *g_MethodNamesRu[] = {L"", L"", L"", L"", L"", L""};
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

およびリスト：

 enum Methods { eMethEnable = 0, eMethDisable, eMethShowInStatusLine, eMethStartTimer, eMethStopTimer, eMethLoadPicture, eMethLast // Always last };
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

プロパティの説明と同様に、これらはGetNMethods 、 FindMethod、およびGetMethodName関数で使用されます。

GetNParams 、 GetParamDefValue 、 HasRetValメソッドは、渡されたパラメーターとアプリケーションロジックに応じて、必要な値を返すスイッチを実装します。 コード内のHasRetValメソッドには、結果を返すことができるメソッドのみのリストがあります。 それらの場合、 trueを返します 。 すべての鉄鋼方法について、 falseが返されます。

CallAsProcおよびCallAsFuncメソッドには、直接実行可能なメソッドコードが含まれています。

関数としてのみ呼び出すことができるメソッドを追加するには、外部コンポーネントのソースコードに次の変更を加える必要があります。

1. メソッド名をg_MethodNamesおよびg_MethodNamesRu配列に追加します （ AddInNative.cppファイル）
2. Methods列挙（ AddInNative.hファイル）に意味のあるメソッド識別子を追加します
3. プログラムロジックに従ってGetNParams関数のコードを変更します。
4. メソッドパラメータのデフォルト値を使用する場合は、必要に応じてGetParamDefValueメソッドコードを変更します。
5. HasRetVal関数を変更します
6. 直接実行可能なメソッドコードを配置して、 CallAsProcまたはCallAsFunc関数のロジックを変更します。

次に、 g_MethodNamesおよびg_MethodNamesRu配列 、 Methods列挙を示します。

 static wchar_t *g_MethodNames[] = {L"Enable", L"Disable", L"ShowInStatusLine", L"StartTimer", L"StopTimer", L"LoadPicture", L"Test"}; static wchar_t *g_MethodNamesRu[] = {L"", L"", L"", L"", L"", L"", L""};
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

  enum Methods { eMethEnable = 0, eMethDisable, eMethShowInStatusLine, eMethStartTimer, eMethStopTimer, eMethLoadPicture, eMethTest, eMethLast // Always last };
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

Testメソッドのパラメーターの数を返すようにGetNProps関数を編集してみましょう 。

 long CAddInNative::GetNParams(const long lMethodNum) { switch(lMethodNum) { case eMethShowInStatusLine: return 1; case eMethLoadPicture: return 1; case eMethTest: return 2; default: return 0; } return 0; }
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

CAddInNative :: GetParamDefValue関数に変更を加えましょう：

 bool CAddInNative::GetParamDefValue(const long lMethodNum, const long lParamNum, tVariant *pvarParamDefValue) { TV_VT(pvarParamDefValue)= VTYPE_EMPTY; switch(lMethodNum) { case eMethEnable: case eMethDisable: case eMethShowInStatusLine: case eMethStartTimer: case eMethStopTimer: case eMethTest: // There are no parameter values by default break; default: return false; } return false; }
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

追加された行のおかげで

 case eMethTest:
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

1つ以上の引数がない場合、対応するパラメーターは空の値（ VTYPE_EMPTY ）になります。 パラメーターのデフォルト値が必要な場合は、 CAddInNative :: GetParamDefValue関数の switchステートメントのeMethTestセクションで設定する必要があります 。

Testメソッドは値を返すことができるため、 HasRetVal関数コードを変更する必要があります 。

 bool CAddInNative::HasRetVal(const long lMethodNum) { switch(lMethodNum) { case eMethLoadPicture: case eMethTest: return true; default: return false; } return false; }
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

そして、実行可能なメソッドコードをCallAsFunc関数に追加します。

 bool CAddInNative::CallAsFunc(const long lMethodNum, tVariant* pvarRetValue, tVariant* paParams, const long lSizeArray) { ... std::wstring s1, s2; switch(lMethodNum) { case eMethLoadPicture: ... break; case eMethTest: if (!lSizeArray || !paParams) return false; s1 = (paParams) -> pwstrVal; s2 = (paParams+1) -> pwstrVal; wstring_to_p(std::wstring(s1+s2), pvarRetValue); ret = true; break; } return ret; }
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

コンポーネントをコンパイルし、構成コードをフォームに追加します。

  ;  () ("...", "DemoVK", .Native);  = ("AddIn.DemoVK.SomeName");  = .(", ", "!"); (); 
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

構成を開始すると、「Hello World！」というメッセージが表示されます。これは、メソッドが正常に機能したことを示しています。

タイマー

チャレンジ：

1. デモVKでタイマーの実装を学ぶ
2. 「StartTimer」メソッドを変更し、パラメーターでタイマー間隔（ミリ秒単位）を渡す機能を追加します。
3. 行った変更が機能していることを確認してください。

WinAPIでは、 WM_TIMERメッセージを使用して時間を処理できます。 このメッセージは、タイマーの作成時に設定した時間間隔でプログラムに送信されます。

タイマーを作成するには、 SetTimer関数を使用します。

 UINT SetTimer(HWND hWnd, //   UINT nIDevent, //  ()  UINT nElapse, //  TIMERPROC lpTimerFunc); //   
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

オペレーティングシステムは、 nElapse引数で指定された間隔（ミリ秒単位）でプログラムにWM_TIMERメッセージを送信します。 最後のパラメーターでは、タイマーがトリガーされるたびに実行される関数を指定できます。 この関数のタイトルは次のようになります（名前は何でもかまいません）：

 void __stdcall TimerProc (HWND hwnd, UINT uMsg, UINT_PTR idEvent, DWORD dwTime)
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

デモVKのタイマー実装を検討してください。

WindowsファミリのOS用の外部コンポーネントの開発プロセスを検討しているため、他のオペレーティングシステムでのタイマーの実装については検討しません。 特にGNU / Linuxの場合、実装はSetTimerおよびTimerProc関数の構文が異なります 。

実行可能コードでは、 SetTimerメソッドが呼び出され 、 MyTimerProc関数が渡されます：

 m_uiTimer = ::SetTimer(NULL,0,100,(TIMERPROC)MyTimerProc);
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

作成されたタイマーの識別子は、後で無効にできるようにm_uiTimer変数に配置されます。

MyTimerProc関数は次のとおりです。

 VOID CALLBACK MyTimerProc( HWND hwnd, // handle of window for timer messages UINT uMsg, // WM_TIMER message UINT idEvent, // timer identifier DWORD dwTime // current system time ) { if (!pAsyncEvent) return; wchar_t *who = L"ComponentNative", *what = L"Timer"; wchar_t *wstime = new wchar_t[TIME_LEN]; if (wstime) { wmemset(wstime, 0, TIME_LEN); ::_ultow(dwTime, wstime, 10); pAsyncEvent->ExternalEvent(who, what, wstime); delete[] wstime; } }
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

この関数の本質は、 ExternalEventメソッドが呼び出され、1C：Enterpriseシステムにメッセージが送信されることです。

StartTimerメソッドの機能を拡張するには、次のアクションを実行します。

GetNParamsメソッドのコードを変更して 、 eMethStartTimerメソッドに対して1を返すようにします。

 case eMethStartTimer: return 1;
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

CallAsProcメソッドのコードをフォームに組み込みましょう：

 case eMethStartTimer: if (!lSizeArray || TV_VT(paParams) != VTYPE_I4 || TV_I4(paParams) <= 0) return false; pAsyncEvent = m_iConnect; #ifndef __linux__ m_uiTimer = ::SetTimer(NULL,0,TV_I4(paParams),(TIMERPROC)MyTimerProc); #else //   GNU/Linux #endif break;
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

次に、パフォーマンスを確認します。 これを行うには、管理アプリケーションのモジュールに構成用のコードを記述します。

  ;  () ("...", "DemoVK", .Native);  = ("AddIn.DemoVK.SomeName"); .(2000); 
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

構成を開始すると、プログラムは2秒間隔でメッセージを受信します。これは、タイマーの正しい動作を示します。

システム「1C：Enterprise」との相互作用

外部コンポーネントと1C：エンタープライズシステム間のやり取りには、 AddInDefBase.hファイルに記述されているIAddInDefBaseクラスのメソッドが使用されます。 最も一般的に使用されるものをリストします。

エラーメッセージの生成

 virtual bool ADDIN_API AddError(unsigned short wcode, const WCHAR_T* source, const WCHAR_T* descr, long scode)
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

wcode 、 scode-エラーコード（説明付きのエラーコードのリストはITSディスクにあります）

source-エラーの原因

descr-エラーの説明

1C：エンタープライズシステムへのメッセージの送信

 virtual bool ADDIN_API ExternalEvent(WCHAR_T* wszSource, WCHAR_T* wszMessage, WCHAR_T* wszData) = 0;
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

wszSource-メッセージソース

wszMessage-メッセージテキスト

wszData-送信データ

メッセージ傍受は、外部イベント処理手順によって実行されます

1Cの外部コンポーネントの登録：エンタープライズシステム

 virtual bool ADDIN_API RegisterProfileAs(WCHAR_T* wszProfileName)
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

wszProfileNameは、コンポーネントの名前です。

これらの方法は、VKと1Cの完全な相互作用に十分です。 1C：エンタープライズシステムから外部コンポーネントによってデータを受信するには、外部コンポーネントは特別なメッセージを送信します。このメッセージは1Cシステムによってインターセプトされ、必要に応じて、データフィードバックのために外部コンポーネントのメソッドを呼び出します。

TVariantデータ型

外部コンポーネントと1C：エンタープライズシステム間でデータを交換する場合、tVariantデータタイプが使用されます。ITSドライブにあるtypes.hファイルで説明されています。

 struct _tVariant { _ANONYMOUS_UNION union { int8_t i8Val; int16_t shortVal; int32_t lVal; int intVal; unsigned int uintVal; int64_t llVal; uint8_t ui8Val; uint16_t ushortVal; uint32_t ulVal; uint64_t ullVal; int32_t errCode; long hRes; float fltVal; double dblVal; bool bVal; char chVal; wchar_t wchVal; DATE date; IID IDVal; struct _tVariant *pvarVal; struct tm tmVal; _ANONYMOUS_STRUCT struct { void* pInterfaceVal; IID InterfaceID; } __VARIANT_NAME_2/*iface*/; _ANONYMOUS_STRUCT struct { char* pstrVal; uint32_t strLen; //count of bytes } __VARIANT_NAME_3/*str*/; _ANONYMOUS_STRUCT struct { WCHAR_T* pwstrVal; uint32_t wstrLen; //count of symbol } __VARIANT_NAME_4/*wstr*/; } __VARIANT_NAME_1; uint32_t cbElements; //Dimension for an one-dimensional array in pvarVal TYPEVAR vt; };
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

タイプtVariantは、次のものを含む構造です。

• データストレージを直接目的とした混合（結合）
• データ型識別子

一般に、tVariant型の変数の操作は、次のアルゴリズムに従って行われます。

1. 現在変数に格納されているデータのタイプを判別する
2. データに直接アクセスするための、混合物の対応するフィールドへのアクセス

tVariantタイプを使用すると、1C：エンタープライズシステムと外部コンポーネントの相互作用が大幅に簡素化されます。

アプリ

examplesディレクトリには、記事の

例のサンプルが含まれています/ 1-デモコンポーネントの

例の起動/ 2-プロパティリストの

例の拡張のデモ/ 3-メソッドのリストの拡張のデモ

各ディレクトリには、VS 2008プロジェクトと既製の1C構成が含まれています。

アプリをダウンロード