社区
Delphi
帖子详情
下面的代碼寫在那個地方?
caizicheng
2004-05-01 09:47:02
为调用此函数必须填写
lpNetResouce结构,此结构的定义为:
typedef struct _NETRESOUCE{
DWORD dwScope;
DWORD dwType;
DWORD dwDisplayType;
DWORD dwUsage;
LPTSTR lpLocalName;
LPTSR lpRemoteName;
LPTSr lpProvider;
} NETRESOURCE;
...全文
71
6
打赏
收藏
下面的代碼寫在那個地方?
为调用此函数必须填写 lpNetResouce结构,此结构的定义为: typedef struct _NETRESOUCE{ DWORD dwScope; DWORD dwType; DWORD dwDisplayType; DWORD dwUsage; LPTSTR lpLocalName; LPTSR lpRemoteName; LPTSr lpProvider; } NETRESOURCE;
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
caizicheng
2004-05-02
打赏
举报
回复
谢谢
lijinghe1
2004-05-02
打赏
举报
回复
uses Windows就行了,不用定义
caizicheng
2004-05-02
打赏
举报
回复
我狂顶
caizicheng
2004-05-02
打赏
举报
回复
TNetResource数据类型如何定义呀?
caizicheng
2004-05-02
打赏
举报
回复
function WNetAddConnection2(var lpNetResource: TNetResource;lpPassword,lpUserName: PChar; dwFlags: DWORD): DWORD; stdcall;
(上面是api调用)
要运行下面代码还需要申明什么?
procedure TForm1.Button1Click
(Sender : TObject);
var
NetSource : TNetResource;
begin
with NetSource do
begin
dwType := RESOURCETYPE_ANY;
lpLocalName := X:;
// 将远程资源映射到此驱动器
lpRemoteName := \hqServersys;
// 远程网络资源
lpProvider := ; // 必须赋值,
如为空则使用lpRemoteName的值。
end;
WnetAddConnection2(NetSource, Password, Guest,
//用户名为Guest,口令为Password
CONNECT_UPDATE_PROFILE);
//下次登录时重新连接
//此时在Windows资源管理器中可看到网络驱动器X:
if MessageDlg(Are you sure to disconnect Drive ?,
mtConfirmation, [mbYes, mbNo], 0) = mrYes then
//不管是否有文件打开,断开网络驱动器X:
WNetCancelConnection2
( X:, CONNECT_UPDATE_PROFILE, True);
end;
end;
lijinghe1
2004-05-01
打赏
举报
回复
楼主搞混了几个问题,
LPNETRESOURCE lpNetResource,
lpNetResource是参数名,前面才是类型。
这个结构在windows单元有定义。
写代码犹如写文章: “大师级程序员把系统当故事来讲,而不是当做程序来写” | 如何架构设计复杂业务系统? 如何写复杂业务代码?
写代码犹如写文章: “大师级程序员把系统当故事来讲,而不是当做程序来写” | 如何架构设计复杂业务系统? 如何写复杂业务代码? Kotlin 开发者社区 “大师级程序员把系统当故事来讲,而不是当做程序来写” 写代码犹如写文章 好的代码应该如好文章一样表达思想,被人读懂。 中心思想: 突出明确 程序是开发者用编程语言写成的一本书,首...
程序员写出这样的代码,能不挨骂吗?
当你换槽填坑时,面对一个新的环境。能够快速熟练,上手实现业务需求是关键。但是,哪些因素会影响你快速上手呢?是原有代码写的不够好?还是注释写的不够好?昨夜...
VB做的程序的代码是放在哪里了呢?
VB做的程序的代码是放在哪里了呢? 从第一次开始接触VB做程序,我就是根据书上的步骤一步一步的来,添加窗体然后双击窗体在里面写代码,有时还添加个模块或者是类模块在里面写代码,当时就已经想了,为什么模块和类模块没有窗体?为什么我可以添加窗体后双击它可以再里面写入代码?这个问题我从来没有深入的查过只是能把程序做出来就完事了,那到底用VB做的程序代码是放在哪里了呢?原来是我一直没有把窗体和模块
【前端面试系列】如何搞定纸上代码环节?
很多重视技术的互联网公司在工程师招聘的技术面环节都会要求候选人在纸上写代码(后文用“纸上代码”代称),面试官想通过这种方式考察哪些点?候选人该注意哪些点?本文基于美团早几年常用的一道区分度比较高的面试题来做详细讲解,这道题我现在还在用,面过的人很多,但是纸上代码环节能答到满分的少之又少。 本文为《前端面试》系列文章的第 3 篇,前 2 篇链接在这里:闭包篇、DOM 篇。 为什么要纸上代...
当一个程序员写不出代码了,该怎么办?
你已经对着电脑n个小时了。不知道该写什么代码,或者一种摔键盘的冲动正在你的胸中酝酿。咖啡一杯接着一杯。不敢再喝了,因为搞不好要有副作用了,心跳加速,身体不由自主地颤抖,出冷汗,但还是无法产出任何代码。所有重新发现编程趣味的努力都徒劳无功,因为你的最后一点能量都用来驱逐大脑中正在攻城略地的话:“我写不出代码了!”编程的本质是棘手即使是最优秀的程序员也会遭遇无法解决的软件工程问题。碰到这样的问题,并不一
Delphi
5,929
社区成员
262,934
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章