Delphi编程基础学习系列—获取Windows系统目录

我以前刚开始学习Delphi编程时做的笔记，适合Delphi初学者。

程序代码如下：

Procedure TForm1.SpeedButton1Click(Sender: TObject);
var
win_dir,sys_dir:array[0..255] of char;
begin
getwindowsdirectory(@win_dir,40);//获取Windows系统目录
getsystemdirectory(@sys_dir,40);//获取System32系统目录
edit1.Text :=win_dir;
edit2.text :=sys_dir;
end;


稍微解释一下：
@放在变量面前，表示获取此变量所在的内存地址：
^在数据类型之前，表示定义一个指针类型；在指针后面，表示获取指针所指向的数据。