Lazarus中文社区

 找回密码
 立即注册(注册审核可向QQ群索取)

QQ登录

只需一步,快速开始

Lazarus IDE and 组件 下载地址版权申明
查看: 1928|回复: 8

lazarus打开中文文件夹是怎么操作法?

[复制链接]

该用户从未签到

发表于 2020-12-17 10:08:57 | 显示全部楼层 |阅读模式
uses ShellAPI;
procedure TForm1.Button2Click(Sender: TObject);
var
   str1:STRING;
   str2:STRING;
   str3:STRING;
begin
str1:='D:\中文,目录';

str2:=ansitoutf8(str1);

  edit1.Text:=str1;
  edit2.Text:= str2;

ShellExecute(Handle,'open','Explorer.exe',pchar(str2),nil,1);

end;


回复

使用道具 举报

该用户从未签到

 楼主| 发表于 2020-12-17 10:10:14 | 显示全部楼层

RE: lazarus打开中文文件夹是怎么操作法?

如上代码用ansitoutf8,打不开"D:\中文,目录"这个文件夹

点评

海!外直播 v.ht/22777 禁闻视频 v.ht/67777 专家说:未来十年,中国癌症将现井喷。33%的家庭,将因此耗尽所有积蓄。1/4中国人喝不上合格水;全球空气污染最严重的城市,一半以上在中国。生命可贵!看这个..  发表于 2023-4-30 04:07
回复 支持 1 反对 0

使用道具 举报

  • TA的每日心情
    奋斗
    2016-8-15 09:19
  • 签到天数: 9 天

    [LV.3]偶尔看看II

    发表于 2020-12-24 11:04:21 | 显示全部楼层

    RE: lazarus打开中文文件夹是怎么操作法?

    小晖 发表于 2020-12-17 10:10
    如上代码用ansitoutf8,打不开"D:\中文,目录"这个文件夹

    试试wincptoutf8 跟 utf8towincp 这两函数在 lazutf8单元
    回复 支持 反对

    使用道具 举报

    *滑块验证:

    本版积分规则

    QQ|手机版|小黑屋|Lazarus中国|Lazarus中文社区 ( 鄂ICP备16006501号-1 )

    GMT+8, 2023-6-11 02:02 , Processed in 0.026997 second(s), 11 queries , Redis On.

    Powered by Discuz! X3.4

    Copyright © 2001-2021, Tencent Cloud.

    快速回复 返回顶部 返回列表