说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

为什么我在dll代码中加入一句showmessage('Good!')后编译会出错?

编辑:说三道四文库 发布时间:2017-01-23 02:26
HTML文档下载 WORD文档下载 PDF文档下载
library MinMax;
function Min(X, Y: Integer): Integer; stdcall;

begin
  if X < Y then Min := X else Min := Y;
  showmessage('Good!');{就是这一句出错}
end;

exports

  Min;

begin

end.
当然了,你没有引入ShowMessage函数的定义和实现嘛

在 library MinMax 后一行加入: uses Dialogs;
同意楼上的,再提点建议:
    最好不要用ShowMessage,因为这样会导致你的Dll体积庞大!
    建议用use Windows;
    然后 MessageBox( ... );


    
    如果是调试程序不失为一种方法
我知道了,非常感谢!各位大侠!
2014情人节没活动?我们来帮你! Windows 8授权销售已超过2亿份 速度不及Win 7 IDC:2013年第四季度Windows Phone出货量大幅增长 深入思考SDN的核心本质:从SDN=OpenFlow回到软件定义网络 谷歌、VMware在Chromebooks上双赢了,微软你怎么看? Tizen真要来了!又有15家IT大佬成帮会成员 研发周报:开源世界应该致谢的五家公司 Square、LinkedIn、Google... 看国外巨头如何“绑架”用户? 一周消息树:5.5寸屏幕的iPhone 6概念机来袭、索契冬奥会开幕式现Bug 一周热点:美国大学生数学建模分析,Hadoop不是万能,探访雅虎数据中心 Google Play services 4.2全球推送,完全支持Chromecast! 移动周报:最快的Web开发IDE——HBuilder Google Glass是空有噱头还是实用品? 服务好“最后一公里”,高效CDN架构经验 “义军”突起,帮用户夺回大数据控制权 为安全,Google收购基于超声波密码验证技术公司SlickLogin 2014 Shenzhen Maker Faire:国内顶级创客聚会即将举行 若无创新,智能手机将是死路一条 任道远上任VMware中国研发中心总经理 Windows免费,微软方能解救PC市场 Hadoop核心架构HDFS+MapReduce+Hbase+Hive内部机理详解 将会出现iCar?苹果应该收购特斯拉的七大原因 广大程序员的福音:Bing Code Search扩展助你方便查找代码 深挖线下价值是当前婚恋交友网站获取盈利的突破点 15个最好的Bootstrap设计工具推荐 Google首席软件工程师Joshua Bloch谈如何设计一款优秀的API【附PPT】 Webix 1.5发布:一个强大的JavaScript UI组件库 四大著名风投:在我们眼中只有技术革新 美女CEO谈AWS:是香水还是毒药 国外一学生发明新计算机系统,用微芯片代替硬盘 《近匠》第12期:Yeelink——智能硬件云服务 求教将文本格式化输出的代码 急需英文WIN2K+多国语言版, 各位专家们,可知道Acer的笔记本用的可是台式CPU? leeyansheng(风妖精) 在不在???刚看见你。怎么还没睡? 请教:我安装完flashget后,可是我要下载文件时,点击时默认的不是flashget,还是一般下载的那种,不知道该如何解决?急 请问为什么不能在dns中创建新区域 怎样控制键盘灯 OK,过足疯瘾了,开始 CODE 那位好心人介绍几本关于 java 的书? 急!!!各位高手,能否帮忙做个流程图,谢谢各位! 如何做一个真正的屏保? 中文Win2000与中文win98在使用CDC::Arc上有什么不同吗? 如何完全控制鼠标 35分任你拿 skyyoung 、 kookoo 、 BrentIvan 、 mshy 四位大虾,请留下email,小弟有要事好事通知! C#适用于开发大型的应用系统吗? 哪位有二手笔记本卖 孤独大哥还在吗?有人找! 请教一个高级问题!!! 怎样把帮助文件(.hlp)转换为和执行文件(.exe)。 关于ACCESS用SQL SUM的问题 怎样在csdn发布自己的软件 谢谢大家的回复.我已经知道可以建立个autorun.ini的文件.内容为(但是还有一个问题...) 菜鸟问题:如何删除一个里面有文件的目录? 我的大梦 API初学者的问题!!帮帮忙!!谢了!!! 那里有《ATL开发指南》第二版 电子工业出版社 下载(高分) 本人编制了一份“使用BCB5进行多国语言开发”的文档,希望对大家有用 ==================月薪8百,招聘VC通讯编程高手72名,要求待遇进来看.============== 展示程序,有原码,只邮前50个。 不对啊!是不是电脑报出错了?? win2000菜鸟问题. 那种包月可比较合算? 变量累加奇怪,奇怪,奇怪!!! 有什么办法能刻录一个大于一张光盘的文件到两个光盘,且拷贝回硬盘时能自动提示插入下一张碟,使文件还原? 用delphi5.0写的ISAPIAPP的程序,上传到INTERNET服务器后数据库的访问路径如何设置? puffdream(911) 同志请进 一个关于api函数的问题? 紧急求助:如何去掉PDF的打印限制 用什么编辑器? JInternalFrame!!!!!!!!!!!!为什么!!!!!!!!!!! 一个关于DrawGrid和Ansistring的问题 想学VC++从哪开始,API、MFC、VC6 如何去掉PDF的打印限制 ---------管理员!管理员!csdn的广告条上那个"波斯猫"mm是谁?----------------- 我在用HelpBuilder写帮助的时候总是提示该主题不存在的错误...? 装上proxy client后为什么SQL explorer连不上数据库 如何让vb中的自定义控件在不同的机器上使用 怎样加速保存一个文件? 手机短信开发的朋友请看! 这样的要求如何实现 高手接招:C/S三层+MsSQL,何种连接方式不必在服务器端安装MsSQL Server? 4/3.4/3等于多少? 解方程(1) 1-1/3x=4 (2) 5x+1/6=x-3x-1/5怎么解答 求matlab高手帮忙看下我这个程序.帮我看下为什么我这个程序在样本仿真那里是错的.clc p1=[1.53 0.58 1.15 0.27 1.35 0.72 0.28 1.32 1.57];t1=[45.32 -68.43 27.76 48.68 72.48 -6.12 48.04 64.85 51.9];p=p1';t=t1';%归一化[pn,m 1+2+3+4等于几 解方程的(1) 1-1/3x=4 (2) 5x+1/6=x-3x-1/5怎么解答 matlab请看一下这个程序,有错误,不会改%f3.m文件function y=f3(p)p=1:10;if abs(p)>=2 f3=0else if abs(p)=1&abs(p) G:\matlab\MATLAB6\work\UntitledZHEXIAN.mOn line 22 ==> k(t)=sum(Z(n)*f3(t-n))出错了,怎么改呢 5吨的3分之1等于( )的2分之1? 5(x+y)=5x+5y是___运算,3x²-3x=3x(x-1)是___变形.2009×954+2009×46能被1000整除吗? matlab 程序错误syms x y [e]=zeros(8,8);e(1,8)=(-2.7*exp(i*y*2));提示y没有定义,但是改为syms x y [e]=zeros(8,8);t=2.7*exp(i*y*2));就不会出错了 这是怎么回事?如果说矩阵不能用符号定义的话,要求解矩阵的本证值 三尺六是多少厘米 matlab 入门小程序matlab初学,让我明白一下处理输入等功能的实现,就包含读取用户输入的数据比如A= 、B=、C=?,然后程序按照一个公式得到函数F(x)的表达式,比如当x>0时候,f=A*x+C,x 关于MATLAB程序问题老是出现这个错误Input argument "fs" is undefined.Error in ==> bilinear at 49fs = 2*fs;程序如下:wp=0.3*pi;ws=0.4*pi;Ap=1;As=20;fs=1;T=1/fs;Wp=(2/T)*tan(wp/2);Ws=(2/T)*tan(ws/2);[N,Wc]=buttord(Wp,Ws,Ap,As,'s')[z,p, 3尺6是多少厘米 Matlab程序求修改!n=0:256;N=length(n);xn=cos(5*pi*n/16);X=0;for m=1:1:N-1; X=x[m]*exp(-j*2*pi*k/length(n)).^n+X;endk=0:N-1;stem(length(n),X);要求用Matlab实现下面这个定义式,不能用fft,我写的代码有问题, 帮我看看这个matlab程序的问题...>> x=1:3;y=4:6;for k=1:length(x);b(1,2*k-1)=x(k);b(1,2*k)=y(k);endbb =1 4 2 5 3 6 4 7为什麽矩阵b有最後4,7这两个元素的?不是前6个而已? 三尺六是多长三尺六换算成厘米是多少 matlab程序有一分数序列 2/1,3/2,5/3,8/5,13/8,21/13……,求前15项和 matlab程序如下:为什么提示运行出错?x= 0:0.01:20;y= 0:0.01:15;[xx,yy]=meshgrid(x,y,'r');q1=1./((yy-10).^2+(xx-4).^2+9);q2=1./((yy-10).^2+(xx-8).^2+9);q3=1./((yy-10).^2+(xx-12).^2+9);q4=1./((yy-10).^2+(xx-16).^2+9);q5=1./((yy-5).^2+(xx-4) 55.55m/s等于多少千米/时 求救,MATLAB程序设计期末作业第二题第三题,2、设y=cos[0.5+((3sinx)/(1+x^2))] 把x=0~2π间分为101点,画出以x为横坐标,y为纵坐标的曲线;3.设f(x)=x^5-4x^4+3x^2-2x+6取x=[-2,8]之间函数的值(取100个点),画出 请问matlab的这段程序有什么为题,为何总是报错,y=0:0.01:0.15;z=-10^8*(1-(4/(0.15^2))*(y^2));plot(y,z);title('切应力场');xlabel('y/m');ylabel('τ/N/m^2') 10厘米等于多少千米 matlab程序设计,矩阵操作1)构造5X5的矩阵A,其中元素为1到25(按行排列)2)去掉A中的第4行,构造矩阵B3)去掉A中第4列,构造矩阵C4)在A中添加第6列,元素为[1 3 5 7 9]^t构造矩阵D,^t 记作右上的小T5)在A matlab 程序出错,帮我看看错在哪儿了函数function dvdt=huxi(t,v) global W L A po pc pn t v P0 P xo xc xn ro rcdvdt=[A/L*po*(xo*P0/100-v(1)/(v(1)+v(2)+v(3)+v(4))*P)-ro*W;A/L*pc*(xc*P0/100-v(2)/(v(1)+v(2)+v(3)+v(4))*P)+rc*W;A/L*pn*(xn*P0/10 米到厘米之间的倍数是多少?厘米到亳米?亳米到分米? 用matlab编程 计算机图形作业(1)简述Bezier曲线的定义和性质(2)以三次Bezier曲线为例,写出三次Bezier曲线的矩阵表达形式(3)绘制一条三次Bezier曲线 matlab 程序出错syms a b c;M1=sym('kiu');M2=sym('kog');M3=sym('lou');syms_matrix=syms_matrix=[a b c;M1,M2,M3;int2str([2 3 5])] 100亳米等于多少分米? matlab程序设计问题编写程序,实现下面功能.给定一个正整数N,求最小的正整数M,使得N 乘以 M只含有0、1,另外简述一下思路, matlab程序出错,function [taub tau h sig Z S sigma sen n senplot CIlower CIupper D Dall C3 nsigma] = ktaub(datain,alpha,wantplot)|Error:Function definitions are not permitted in this context. 5002亳米等于多少米等于多少分米等于多少厘米,大哥, 请问下列MATLAB程序哪里错误clear allm=0.2;w=3;b=0.8;A=0.2;xf=dsolve('D2x=-w*w*x','Dx(0)=0,x(0)=A',''t);xd=dsolve('D2x=-2*b*Dx-w*w*x','Dx(0)=0,x(0)=A','t');t=linspace(0,8,200);xf1=eval(xf);xd1=eval(xd);hold onb=0.99*w;xd2=eval(xd);plot(t,xf1, matlab程序出现了错误,不知道哪里出错了这样的程序clearsyms a b ;c=[a b]';A=[2.9 3.6 4.5 5.88 8.1];B=cumsum(A);n=length(A);for i=1:(n-1)c(i)=(B(i)+B(i+1))/2;endD=A;D(1)=[];D=D';E=[-C;ones(1,n-1)];c=inv(E*E')*E*D;c=c&# 3x^2-5x+1 因式分解 提示:令原式为0 看看我的MATLAB程序哪里出错了?程序如下:function yp=zhendong(t,y)global b w w1 h;yp=[y(2);-2*b*y(2)-w~2*y(1)+h*cos(w1*t);clear allglobal b w w1 h;h=0.4;A=0.2;w=0.3*pi;k=[0.1:0.01:2];w10=k*w;b1=[0.1:0.1:0.4];tspan=[0 100];y0=[A;0];optio matlab程序,不知道哪里出错了,显示为Error:File:C:\MATLAB7\work\Untitled.m Line:4 Column:5Incomplete or misformed expression or statement.x=[19 25 31 38 44];y=[19.0 32.3 49.0 73.3 97.8];x1=x.^2x1 =361 625 961 1444x1=[ones(5,1),x1']x1 =1 361 用因式分解法解方程3x(5x+1)=10x+2 求matlab大神看我的程序哪里错了额y=[100,70,60,30,20,10,10,0,0,60,40,30]’;x4=[5,10,15,5,10,15,5,10,15,5,10,15];x2=[0,0,0,0,0,0,15,15,15,20,20,20];x3=[1.5,2.5,3.5,0.5,1.5,1.3,1.2,1.5,1.2,0.9,0.7,0.9];x41=[1.75*pi,1.75*pi,1.75*pi,1.75*pi,1 matlab的一个程序,不知道什么问题.程序如下:hfigure=figure('name','设置曲线的形状与颜色','menubar','none','numbertitle','off','visible','off','position',[200 60 450 450]);haxes=axes('position',[0.15 0.45 0.7 0.4],'xlim',[0 7] 1+5x-3x^因式分解 帮我看看matlab程序错误function [h,q]=multioderarnoldi(A)n=1000;p=10;%端口数syms q;phi0=ones(n);phik=zeros(n);B=ones(n,p);R=inv(phi0)*B;%由上式求R,n*pK=zeros(n,p);%n*p[q0,K]=qr(R); M=4850;%多项式系统阶数q=(n-1)*p;for k=1:n-1Ak=-i 有没有高手能帮我找下matlab程序的错误啊?Function ta=echotsp(w)w=[0 10 16 4 0 0 9 0 0 15 0 0;10 0 8 8 6 0 0 12 7 0 0 0;16 8 0 0 0 3 0 0 8 0 0 0;4 8 0 0 5 0 7 0 0 0 14 0;0 6 0 5 0 0 0 8 0 0 11 0;0 0 3 0 0 0 0 0 5 0 0 11;9 0 0 7 0 0 0 0 0 因式分解 5x(3x-√2)-(3√3)x+√6=0√ 为根号 MATLAB程序问题源程序:clear all;close all;n=-20*pi:pi/5:20*pi;fn=sin(n/5)/(n/5);stem(n,fn,'fill');error:X must be same length as Y.函数是:f(n)=sin(n/5)/(n/5) (-20 matlab程序出错,目的是要求自然风压时程,用谐波叠加法,Davenport谱clear,clct0=clock;N=1024; %采样点数wu=5*2*pi; %截断频率dm=wu/N; %频率步长dt=2*pi/(2*wu); %时间步长k=0.003; %地面粗糙度d=0.01;f=d:d:10;v10=45; %10 -3的三分之一次方除以(6的三分之4次方)的2分之三次方用幂的形式表示 3x²+5x+2=0用因式分解, 请问这段matlab程序哪里错了?clcclear allh=1;c=3*10^8; Eps0=10^-9/(36*pi);u0=4*pi*10^-7;epslona=5.5225;ua=1.0;na=epslona^0.5;a=2*pi*4.8797e-008;%a=120*7e-9;epslonb=1.9044;nb=epslonb^0.5;ub=1;b=2*pi*4.8797e-008;%ab=240*7e-9%nb=3.23;epslonb=nb^ 3个10,1个4.怎么等于24? 用因式分解法解 3x*x-5x=2 这段matlab程序怎么优化m=1;A=[0 3 5.5 7.5 9 10 10];B=[0 3 6 8 9.5 10.5 11];C=[0 4 6.5 8.5 9 9 9];D=[0 3.5 6 7.5 8.5 9 9];for i=1:7for j=1:7for k=1:7for l=1:7if i+j+k+l==10d(m)=A(i)+B(j)+C(k)+D(l);E(m,1)=i;E(m,2)=j;E(m,3)=k;E(m,4)=l;m=m+1;enden 3,8,6,9怎样等于24? 3X+8=5x-6解方程(详细一些) 请问我这段matlab程序有什么问题?x=[600 600 600 600 600 600 600 500 500 500 500 500 500 500 400 400 400 400 400 400 400 300 300 300 300 300 300 300 200 200 200 200 200 200 200];y=[4 6 8 10 12 14 16 4 6 8 10 12 14 16 4 6 8 10 12 14 16 4 6 8 8 8 3 6每个数用一次,让它们的结果等于24 0.3X+40=0.5X 怎么解谁会解 求高手帮忙看一下Matlab求积分的程序,我想求多个定积分的值,示例如下cleara=0:0.5:2;n=5;for i=1:n;fun=inline('a(i)*exp(-x*x)','x');Isim=quad(fun,0,1)end就是求不同的a的情况下的定积分的值,但每次都出错,a换 3个8和一个6怎么等于24 x-1 MATLAB问题,非常急1已知Fibonacci数列的定义如下,F(1)=1,F(2)=1,f(n)=f(n-1)+f(n-2)(n>2),求Fibonacci数列第18项.2已知矩阵三行三列矩阵A为(1,3,4,0,5,7,-3,9,25),B为(-2,0,53,13,21,-4,-1,6,19),(矩阵不好打成
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn