社区
Delphi
帖子详情
大家帮我看一下我的代码有什么问题,急!!!
fuction
2003-12-12 01:01:48
var
p1,p2:pchar;
a,b:string;
begin
getmem(p1,256);
getmem(p2,256);
a:=data1+'='+data2+'=';
b:=data1+'='+data2+'='+data3+'=';
strcopy(p1,@a[1]);
strcopy(p2,@b[1]);
code:=writecard(n1,n,p1,p2,2);
freemem(p1);
freemem(p2);
end;
...全文
52
6
打赏
收藏
大家帮我看一下我的代码有什么问题,急!!!
var p1,p2:pchar; a,b:string; begin getmem(p1,256); getmem(p2,256); a:=data1+'='+data2+'='; b:=data1+'='+data2+'='+data3+'='; strcopy(p1,@a[1]); strcopy(p2,@b[1]); code:=writecard(n1,n,p1,p2,2); freemem(p1); freemem(p2); end;
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
fuction
2003-12-12
打赏
举报
回复
问题解决了,高兴!来者有分!!!
fuction
2003-12-12
打赏
举报
回复
可是我的系统提示说是内存错误,这是怎么回事啊!!!
chinajavis
2003-12-12
打赏
举报
回复
建议设置断点调试一下是什么错误
sundayboysII
2003-12-12
打赏
举报
回复
建议修改StrCopy的函数参数:
StrCopy(P1, Pchar(a));
StrCopy(P2, PChar(b));
qiume
2003-12-12
打赏
举报
回复
// 应该没什么问题
var
p1,p2:pchar;
a,b:string;
begin
getmem(p1,256);
getmem(p2,256);
try
a:=data1+'='+data2+'=';
b:=data1+'='+data2+'='+data3+'=';
strcopy(p1,@a[1]);
strcopy(p2,@b[1]);
code:=writecard(n1,n,p1,p2,2); // writecard对吗?
finally
freemem(p1);
freemem(p2);
end;
end;
VeryOldMan
2003-12-12
打赏
举报
回复
你的代码没什么问题呀。
检查以下你的writecard()函数吧。
99% 的同学写不出好
代码
,都是因为这个
问题
!
大多数学编程的同学从来都不注意的
问题
,必看! 大家好,我是鱼皮,最近
帮
一些学弟妹看他们开发的项目时,发现一个很严重的
问题
,那就是他们的
代码
写的很 粗糙 。 什么叫粗糙呢? 就是指:虽然表面上项目能够运行,界面效果也还不错,但是当我去看他们写的
代码
时,发现
代码
的质量很低。有些人明显是写了
代码
之后 自己都没有读过一遍 ! 举几个例子: 1 行
代码
能完成的功能要写 10 行、20 行,看着都累。 同样的
代码
要复制粘贴好几遍,有些变量名粘贴后还忘了改。 变量取名很不规范,甚至还有中文名称! [外.
求助使用asp中加密与解密对应的函数出错?大家
帮
忙看
一下
!
我根据http://www.kao99.com/club/article_view.asp?id=56例子调试,出现很内部服务器错误!大家
帮
帮
忙呀!很多网站ASP技术方面都有这一方面文章,大家
帮
帮
忙呀!希望达到中文字符加密解密效果!但是我根据例子来调试,出现很内部服务器错误,大家
帮
帮
看看,例子什么地方出错拉!
帮
忙调试
一下
!我
急
着要用asp中加密与解密对应的函数,谢谢大家拉!
Python
代码
注释9种方式,Python怎么注释一段
代码
!
编写清晰、简洁的
代码
注释是良好编程习惯的重要组成部分.以下是9个简单易懂的
代码
注释示例,通过具体案例来展示不同类型的注释和最佳实践!
解决啦:麻烦管理员
帮
我改下——我的后台管理分类那里不正常啦:带css样式的那个标签不能编辑啦!!麻烦啦,谢谢啦先
麻烦管理员
帮
我改下——我的后台管理分类那里不正常啦:带css样式的那个标签不能编辑啦!!我就在那个分类介绍里添加啦附带(文章末尾)的那个html
代码
(是看支持html
代码
才弄得),结果就成这样啦还有我刚看拉看,连添加分类也没有啦!!,麻烦管理员啦,谢谢 呵呵,我把后台页面
代码
保存回来修改后,本地提交修改啦,呵呵,现在好啦,管理员不用看拉,呵呵下边我贴上图 下边是我
学了编程却写出错误
代码
?程序运行结果与想象不符?当bug出现时该何去何从,别担心,这篇文章统统告诉你!手把手带你调试
代码
,让bug原形毕露!
【手把手带你搞定】实用调试技巧什么是bug 之前我们对C语言的知识进行了一一的讲解,但是当我们自己真正写
代码
的时候,又会发现很多
问题
,比如程序运行时崩溃、程序运行的结果不是我们想要的等等,虽然
代码
已经能够跑起来了,但是依然不是理想中的状态。 这时候应该怎么办呢? 别
急
,现在立即教你使用调试技巧。 手把手带你搞定bug。 什么是bug 大家看看下面这张图: 这是世界上的第一个bug。 ...
Delphi
5,928
社区成员
262,931
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章