两个小问题，在线等....

Question

1.GetSystemDirectory的两个参数怎么用。
2.如何知道现在用的是哪个操作系统。比如，在双系统中，我想知道，我现在用的是98还是2000。
谢大家了。

Answer 1

var 
MySysPath : PCHAR ; 
begin 
GetMem(MySysPath,255); 
GetSystemDirectory(MySysPath,255); 
end; 
注:MySysPath为SYSTEM路径

Answer 2

1.
procedure TForm1.Button1Click(Sender: TObject);
var
  buf:array[0..MAX_PATH] of char;
begin
GetSystemDirectory(buf,sizeof(buf));
ShowMessage(buf);
end;