The use of GetWindowsDirectory..

I tried to use it like this...

Procedure Button1.Click...
Var Test:PChar;
    BufferS:Integer;
Begin
   BufferS:=255;
   GetWindowsDirectory(test,BufferS);
   ShowMessage(Test);
End;

However, I get some message like "Access Violation"...
Is there somebody outthere who knows how to use it?
Please give me a syntax example....

Thanx!
Erik N.


Erik NAsked:
Who is Participating?
 
ronit051397Connect With a Mentor Commented:
procedure TForm1.Button1Click(Sender: TObject);
var A: PChar;
begin
  GetMem(A,MAX_PATH+1);
  GetWindowsDirectory(A,MAX_PATH+1);
  showmessage(StrPas(A));
  FreeMem(A,MAX_PATH+1);
end;
0
 
Erik NAuthor Commented:
Edited text of question
0
 
Erik NAuthor Commented:
Thank you for this, ronit!
Erik N.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.