このコードを C++ から Delphiに変換していますが、コードの次の部分が得られません。次のコードの意味を誰か説明してもらえますか? szBuff バッファに何が起こっていますか?
私はそれがそのような種類のフォーマット(置換)であると確信していますが、結果として何が期待されるのかさえわかりませんし、使用された関数の賢明なドキュメントを見つけることができません(多分私はただの足が不自由です:)
このコードを Delphi に変換するのを手伝ってくれる人はいますか (または適切なドキュメントを教えてくれますか)。
質問の種類を自分で変換する方法が気に入らないので、質問のタイトルに少なくとも関数名を記載して、将来他の人が検索できるようにしました。
function TSecInfo.BuildSecurityAttributes(var SecAttrs: TSecurityAttributes): boolean;
var
pszSidUser: PChar;
szBuff: array [0..1024] of Char;
begin
// pszSidUser at this time contains user SID like this
// S-1-5-21-1454471165-1004336348-1606980848-5555
// TCHAR szBuff[1024]; // I'm not sure with array [0..1024] of Char;
_tcscpy(szBuff, _T("D:"));
_tcscat(szBuff, _T("(A;;GA;;;"));
_tcscat(szBuff, pszSidUser);
_tcscat(szBuff, _T(")"));
_tcscat(szBuff, _T("(A;;GWGR;;;AN)"));
_tcscat(szBuff, _T("(A;;GWGR;;;WD)"));
...
_tcscat(szBuff, _T("S:(ML;;NW;;;S-1-16-0)"));
end;
リンクからのコード全体に興味がある人にとっては、上記の Windows Vista で匿名ユーザーとして書き込むためにネットワーク パイプにアクセスする方法がトリックであることがわかります。記事全体を表示するには、このリンクをたどってください。
お時間をいただきありがとうございます
よろしく