Howto Use TOpenDialog/fr

From Lazarus wiki
Revision as of 22:40, 4 May 2010 by Hispanaves (talk | contribs)
Jump to navigationJump to search

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 à:

<delphi>

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

</delphi>

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.