我用getwindowsdirectory函数得到系统的路径,怎样才能把这路径的后五位赋值给一个字符串?
比如:
var
buff:array [1..255] of char
c,s:string;
begin
getwinodwsdirectory(@buff,255);
s:=buff;
c:=rightstr(s,5);
但c却得不到值,为什么?
比如:
var
buff:array [1..255] of char
c,s:string;
begin
getwinodwsdirectory(@buff,255);
s:=buff;
c:=rightstr(s,5);
但c却得不到值,为什么?
解决方案 »
- 如果查找所有窗口句柄
- 判断文件夹下随时创建的文件,如何得到刚建立的文件的名和路径
- 能不能在一个单元格中显示多行数据
- =请教关于带有数据源的数据控件数据产生异常时的捕捉=
- 如何用QR打印出带网格的数据?
- 谁有Tadvstringgrid控件使用例子发一份给我,收到即刻给分!
- 如何制作自解压安装程序啊?就象winrar.exe安装程序那样?????(在线)
- 如何理解强类型转换,及强类型转换的定义?
- 参数配置没错提示:too many actual parameters错误
- HELP!!!DELPHI中串口控制如何传输二进制信息
- 关于activex 编写的问题
- 求无文档API库ws2help.dll相关资料
不要加@
buff:pchar;//array [1..20] of char;
c,s:string;
begin
getmem(buff,20) ;
getwindowsdirectory(buff,20);
s:=buff;
c:=rightstr(s,5);
showmessage(c);
end;
var
s : string;
begin
SetLength(s, 256);
GetWindowsDirectory(PCHAR(s), 256);
Edit1.Text := s;
end;
var
s : string;
begin
SetLength(s, 256);
GetWindowsDirectory(PCHAR(s), 256);
SetLength(s, StrLen(PChar(s))); //要这个
Edit1.Text := s;
end;
SetLength(s, StrLen(PChar(s))); //要这个