SaveDialog [Résolu]

Messages postés
6
Date d'inscription
mercredi 30 novembre 2005
Dernière intervention
1 janvier 2007
- 29 déc. 2006 à 17:16 - Dernière réponse :
Messages postés
6
Date d'inscription
mercredi 30 novembre 2005
Dernière intervention
1 janvier 2007
- 29 déc. 2006 à 18:44
Bonjour,

J'utilise un SaveDialog, pour enregistrer un memo.
Mais le probleme est que quand je modifie le memo, et que j'enregistre apres la premiere sauvegarde, le SaveDialog ne renvoie encore la fenetre "enregistrer sous" alors que je veux juste "enregistrer" dans le meme endroit.

En vous remerciant, de votre attention!
Afficher la suite 

Votre réponse

2 réponses

Meilleure réponse
Messages postés
424
Date d'inscription
mardi 3 janvier 2006
Dernière intervention
26 novembre 2013
- 29 déc. 2006 à 18:07
3
Merci
Salut,

Tu ne dois plus utiliser le SaveDialog après la première sauvegarde.

var
   TextFileName: string;

Tu initialises TextFileName:= '' (par exemple dans l'événement OnCreate de form1)

procedure TForm1.EnregistrerSous;
begin
  if SaveDialog1.Execute then
  begin
     TextFileName:= SaveDialog1.FileName;
     Memo1.Lines.SaveToFile(TextFileName);
  end;
end;

procedure TForm1.Enregistrer;
begin
   if TextFileName  = '' then EnregistrerSous
   else
       Memo1.Lines.SaveToFile(TextFileName);
end;

Ainsi, si l'utilisateur clique sur bouton (ou menu) enregistrer, Savedialog s'ouvrira la 1° fois, mais pas après.

A +
Thierry

Merci ThWilliam 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 88 internautes ce mois-ci

Commenter la réponse de ThWilliam
Messages postés
6
Date d'inscription
mercredi 30 novembre 2005
Dernière intervention
1 janvier 2007
- 29 déc. 2006 à 18:44
0
Merci
merci,
Commenter la réponse de boitas

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.