delphi4arab منتديات دلفي للعرب

السلام عليكم

كود :
SHGetFolderPath(0,CSIDL_APPDATA,0,SHGFP_TYPE_CURRENT,@path[0])

بخصوص الـparameter الاخير لماذا تم وضع '@' و لماذا ال [0]

ثم لماذا هذا proceudre لا يعمل

كود :
procedure TForm1.Button1Click(Sender: TObject);
var path : array [0..MAX_PATH] of char;
  i : integer;
  s,ss : string;
begin
  SHGetFolderPath(0,CSIDL_APPDATA,0,SHGFP_TYPE_CURRENT,@path[0]);
  s := '';
  showmessage(IntToStr(length(path)));
  for i := 0 to length(path) do
    begin
        s := s + path[i];
    end;
    memo1.Lines.Add(s+'\folder');
end;

نستعمل هذا الرمز للحصول على عنوان اى شىء فى الذاكرة

كود :
[B][color=Black]@[/color][/B]

إقتباس :و لماذا ال [0]

للحصول على عنوان اول بايت من المصفوفة path كما يمكن الاستغناء عن [0] بما ان عنوان اول بايت للمصفوفة هو نفسه عنوان المصفوفة

PHP كود :
@path 

كود :
SHGetFolderPath  لماذا لا يعمل

لان هذا الاجراء غير معرف فى برنامجك . او ... او ... .

yassine_hell

hanipino