请帮忙翻译这句C++语句

zxtyhy 2006-12-14 02:34:11
DEMOPAGE_API HWND __stdcall Init(HWND hWndParent, unsigned __int64 gid, LPCTSTR pszUserPath)
{
if(g_pDllMainWnd == NULL)
{
g_pDllMainWnd = new CDllMainWnd;
g_pDllMainWnd->m_strText = pszUserPath;
g_pDllMainWnd->Create(NULL, _T("DllMainPage"), WS_CHILD|WS_VISIBLE, CRect(0,0,0,0),
CWnd::FromHandle(hWndParent), 2344);
}
return g_pDllMainWnd->m_hWnd;
}

如题,请帮忙用delphi写一下。
...全文
126 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
zxtyhy 2006-12-14
  • 打赏
  • 举报
回复
CDllMainWnd 应该是个窗体,对吗?
ly_liuyang 2006-12-14
  • 打赏
  • 举报
回复
用PChar,不要用String
lihuasoft 2006-12-14
  • 打赏
  • 举报
回复
g_pDllMainWnd = nil
lihuasoft 2006-12-14
  • 打赏
  • 举报
回复
我扔块小砖头, 引引玉哈!( 我知道我肯定译得不对...楼主和过往高人不要笑....我自己都不好意思了......)

var g_pDllMainWnd : CDllMainWnd;

function Init(hWndParent:HWND; gid:Cardinal; pszUserPath:string):HWND;stdcall;
begin
if(g_pDllMainWnd = 0) then
begin
g_pDllMainWnd.m_strText := pszUserPath;
g_pDllMainWnd.Create( 0 , _T('DllMainPage'), WS_CHILD + WS_VISIBLE, CRect(0,0,0,0), hWndParent.handle , 2344);
end;
result := g_pDllMainWnd.m_hWnd;
end;

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧