Discussion :

[Leesox]

Bonjour,

Je voudrais trouver le répertoire data de l'utilisateur. J'ai trouvé la solution à mon problème dans la faq avec cette fonction
http://delphi.developpez.com/faq/?pa...ystemdirectory
mais j'ai une erreur sur la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SHGetSpecialFolderLocation(Form.Handle, Folder, SFolder);

Form n'est pas déclaré.
Je pensais qu'il manquais le Form dans le uses mais non.
A noter que j'ai bien ajouter Shlobj dans les uses.
Que manque t'il comme déclaration ?

[delphi63]

Salut.

Cherche un peu, "Form" est le nom de ta classe TForm, Delphi la nomme Form1 par défaut. Tu es très fatigué à ce que je vois.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;
 
var
  Form1: TForm1;

[Leesox]

Bonjour,
Je te remercie beaucoup de te soucier de mon état de fatigue et çà tombe bien je vais partir en vacances dans 8 jours

Ok, je suis pas trop intélligent sur ce coup là ! Merci quand même de m'avoir répondu.