新手入门问题,请教!(30分)

  • 主题发起人 主题发起人 一成
  • 开始时间 开始时间

一成

Unregistered / Unconfirmed
GUEST, unregistred user!
char(10);

我这样写
var i:integer;
i:=strtoint(edit1.text);
char(i);

出错提示类型不对 pchar and char
请问怎么修改???
 
char(i)放在这里什么意思?你想要怎么样?
Pchar和String类型的转换有strpcopy和strpas,查查帮助看能不能解决你的问题。
 
var i:integer;
c:char;
i:=strtoint(edit1.text);
c:=char(i);

 
具体情况是这样的
程序A的application.title:=char(i) 这里的i是个不定数,在1~100之内

我要在要用程序B来关闭程序A,代码如下:
var
i:integer;
c:char;
p:pchar;
h:thandle;
begin
for i:=1 to 100 do begin
c:=char(i);
strpcopy(p,c);
h:=findwindow(nil,p);
if h<>0 then
begin
showmessage(inttostr(i));
break;
end;
end;
sendmessage(h,wm_close,0,0);
end;

程序出错,提示:[Warning] Unit1.pas(35): Variable 'p' might not have been initialized

strpcopy(p,c); 这行错了,哪位大哥帮忙指点一下
 
这么久了,算了,结束吧
 
后退
顶部