Howto Use TOpenDialog/fr

From Lazarus wiki
Revision as of 15:31, 24 March 2012 by Vincent (talk | contribs) (Text replace - "delphi>" to "syntaxhighlight>")

Deutsch (de) English (en) español (es) suomi (fi) français (fr) 日本語 (ja) polski (pl) русский (ru) slovenčina (sk)

Directive simple et courte :

1. Placer le gadget OpenDialog sur votre fiche (n'importe où, puisqu'il sera pas visible).

  (C'est le dialogue le plus à gauche sous dialogue)

2. Dans votre code écrire quelque chose similaire à:

   var filename : string;

   if OpenDialog1.Execute then
   begin
     filename := OpenDialog1.Filename;
     ShowMessage(filename);
   end;

La methode Execute montre la boîte de dialogue d'ouverture de fichiers. Il renvoie True quand l'utilisateur a sélectionné un fichier, False quand l'utilisateur a échoué.

La propriété Filename renvoie le nom de fichier complet incluant l'unité de disque et le chemin.