winapi: getwindowsdirectory-獲取 windows 所在目錄
//宣告:
getwindowsdirectory(
lpbuffer: pchar;
usize: uint
): uint;
//舉例:
vararr:
array[0
..max_path]
ofchar;
num: uint;
begin
num :
=getwindowsdirectory(arr, max_path);
showmessage(arr);
showmessage(inttostr(num));
end;
winapi: getsystemdirectory
-返回 system 資料夾路徑
//宣告:
getsystemdirectory(
lpbuffer: pchar;
usize: uint
): uint;
//舉例:
vararr:
array[0
..max_path]
ofchar;
num: uint;
begin
num :
=getsystemdirectory(arr, max_path);
showmessage(arr);
showmessage(inttostr(num));
end;
winapi: gettemppath
-獲取臨時資料夾路徑
//宣告:
gettemppath(
nbufferlength: dword;
lpbuffer: pchar
): dword;
//舉例:
vararr:
array[0
..max_path]
ofchar;
num: dword;
begin
num :
=gettemppath(max_path, arr);
showmessage(arr);
showmessage(inttostr(num));
end;
winapi: gettempfilename
-生成乙個臨時檔名
//宣告:
gettempfilename(
lppathname: pchar;
lpprefixstring: pchar;
uunique: uint;
lptempfilename: pchar
): uint;
//舉例:
varp,f:
array[0
..max_path]
ofchar;
begin
gettemppath(max_path, p);
gettempfilename(p,
'~my',
16, f);
showmessage(f);
end;
winapi: copyfile
-複製檔案
//宣告:
copyfile(
lpexistingfilename: pchar;
lpnewfilename: pchar;
bfailifexists: bool
): bool;
//例1:
begin
copyfile(
'c:\bootlog.txt',
'c:\temp\bootlog.txt
', true);
end;
//例2:
varexistfile, newfile:
string
;begin
existfile :='
c:\bootlog.txt';
newfile :='
c:\temp\bootlog.txt';
ifcopyfile(pchar(existfile), pchar(newfile), true)
then
showmessage(
'複製成功');
end;
檔案處理函式
這兩天在寫個遍歷檔案批處理的小工具，碰到幾個時間相關的函式，整理了下，說不定以後可能會再用到呢 判斷檔案是否存在 bool filei ists lpcstr filepath findclose hfind return true 獲取檔案最後修改時間距當前時間的差值 用於判斷該檔案是否正在寫的一...
檔案處理函式
前幾天參加鄭州悉知公司的校園招聘會，面試官問了很多有關檔案處理函式，當時回答的不是很少，雖然平時也經常用到有關檔案處理的函式，但是也沒對檔案處理函式做總結，檔案處理函式也是我們學習web開發中重要的一塊 這是回來之後對檔案處理函式的總結 basename 返回路徑中的檔名 c hgrp 改變檔案所屬...
檔案處理 函式
方式二函式 二 為何要有函式 三 如何用函式 函式中引數的分類 二 實參 with open a.txt mode r t encoding utf 8 as f print f.writable f.seek 7,0 f.write sb with open a.txt mode r t enco...