各位大大們好 小弟又有新手問題想請教各位前輩了
Var
a = C:\123\test.exe;
begin
Showmessage(PChar(a));
end

得到的結果會列印出"C:\123\test.exe"
請問要怎麼戴字串才會讓它列印出"C:\123\"呢

小弟有找到方法
Showmessage(ExtractFilePath(Str[i]));
就可以解決了

但是要怎麼顯示在Label1裡面呢?
Label1.Caption := (ExtractFilePath(Str[i])); // 錯誤


===================引 用 mjihkimo 文 章===================
各位大大們好 小弟又有新手問題想請教各位前輩了
Var
a = C:\123\test.exe;
begin
Showmessage(PChar(a));
end

得到的結果會列印出"C:\123\test.exe"
請問要怎麼戴字串才會讓它列印出"C:\123\"呢

小弟有找到方法
Showmessage(ExtractFilePath(Str[i]));
就可以解決了

但是要怎麼帶到其他地方呢?

wFunc := FO_COPY;
pFrom := ExtractFilePath(Str[i]); <== 錯誤
pTo := 'C:\test';

[Error] Unit1.pas(14): Incompatible types: 'String' and 'PChar'

已經找到問題 原來是字串編碼有問題 ^^


===================引 用 mjihkimo 文 章===================
小弟有找到方法
Showmessage(ExtractFilePath(Str[i]));
就可以解決了

但是要怎麼帶到其他地方呢?

wFunc := FO_COPY;
pFrom := ExtractFilePath(Str[i]); <== 錯誤
pTo := 'C:\test';

[Error] Unit1.pas(14): Incompatible types: 'String' and 'PChar'