Delphi XE2 DataSnap - サーバーメソッドモジュールのREST接続プロパティにアクセス

Question

RESTクライアントからの接続を提供するXE2 DataSnapサーバーを構築しています。私のDSServerClass LifeCycleプロパティが 'Invocation'に設定されています。 REST接続プロパティには、DSAuthenticationManagerのUserAuthenticate（）イベントを介して処理されるユーザー名とパスワードが含まれます。私が知る必要があるのは、サーバーメソッドクラス内のユーザー名とパスワードにどうやってアクセスできるかです。自分のサーバークラスのオブジェクトインスタンスを起動したRESTユーザー名/パスワードを知りたい。

Answer 1

あなたはそのためDSServerClass.OnPrepareを使用することができます。

procedure TServerContainerTest.DSServerClass1Prepare(
    DSPrepareEventObject: TDSPrepareEventObject); 
begin 
    // Add username property to TServerMethodsTest 
    if DSPrepareEventObject.MethodInstance is TServerMethodsTest then 
    TServerMethodsTest(DSPrepareEventObject.MethodInstance).Username := DSPrepareEventObject.UserName; 
end; 

あります使用可能なパスワードではありません。 これにはサーバーライフサイクルを使用しないでください！