begin process at 2012 02 11 09:41:27
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Delphi

 > 

Divers

 > 

Aide et documentation

 > 

Récuperer derniere ligne d'un tmemo


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Récuperer derniere ligne d'un tmemo

mardi 6 mai 2008 à 21:56:11 | Récuperer derniere ligne d'un tmemo

elt93

Bonjour,
J'aimerais récuperer la derniere ligne d'un TMemo afin de l'attribuer à une variable string, ceci est sans doute très simple mais je ne sais pas comment faire pour recuperer la derniere ligne du TMemo.
Merci d'avance pour votre aide .
mardi 6 mai 2008 à 22:32:08 | Re : Récuperer derniere ligne d'un tmemo

cantador

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !

Bonsoir elt93,

procedure TForm1.Button1Click(Sender: TObject);
var
  i: integer;
  SL: TstringList;
  Fichier, Recup: string;
begin
  try

    Fichier := 'c:\temp\Fich.txt';
    SL := TStringList.Create;
    Memo1.Lines.SaveToFile(Fichier);
    SL.LoadFromFile(Fichier);
    Recup := SL.Strings[SL.count - 1];
    ShowMessage(Recup);
  finally
    SL.Free;
  end;
end;

on peut certainement écrire une fonction..

cantador

mercredi 7 mai 2008 à 00:44:44 | Re : Récuperer derniere ligne d'un tmemo

cirec

Membre Club Administrateur CodeS-SourceS
Réponse acceptée !
Salut,

Pourquoi utiliser une StringList ?

Recup := Memo1.Lines[Memo1.Lines.Count - 1];

C'est tout

 
@+
Cirec

mercredi 7 mai 2008 à 09:28:30 | Re : Récuperer derniere ligne d'un tmemo

JulioDelphi

Membre Club Administrateur CodeS-SourceS
Cantador : Pourquoi utiliser une variable de fichier ? L'utilisateur n'en a pas besoin, il n'en a meme pas parlé ! Pourquoi remplir une TStringList alors que les Lines du memo sont deja des TStrings !
Wow, t'as vraiment cherché super compliqué sur ce coup la !

J'ai modifié la reponse acceptée pour Cirec plutot ^^
mercredi 7 mai 2008 à 13:38:41 | Re : Récuperer derniere ligne d'un tmemo

cantador

Membre Club Administrateur CodeS-SourceS

Bonjour JulioDelphi,
Oui effectivement la solution de cirec est nettement plus courte, mais ma proposition fonctionne aussi et peut s'avérer utile en cas d'utilisation d'un fichier.
Qt à l'approbation du demandeur, vous ne pouvez connaître exactement son souci et il me semble que c'est à lui de décider si la réponse lui convient ou pas..
Sinon, tu devras passer en revue toutes les propositions acceptées sur le forum, les passer au peigne fin et attribuer les bons points !!

Et là je demande à voir..

Peut-être une petite saute d'humeur de ta part due aux premières chaleurs...

cantador

mercredi 7 mai 2008 à 13:53:59 | Re : Récuperer derniere ligne d'un tmemo

JulioDelphi

Membre Club Administrateur CodeS-SourceS
Nan rien a voir, aucontraire il fait beau tout va bien :p ta réponse n'est pas "mauvaise" mais "pas adaptée" je dirais. allez je vous mets a 2 =)

Bon soleil a tous !
mercredi 7 mai 2008 à 14:48:54 | Re : Récuperer derniere ligne d'un tmemo

cantador

Membre Club Administrateur CodeS-SourceS
merci Julio

cantador
mercredi 7 mai 2008 à 20:04:02 | Re : Récuperer derniere ligne d'un tmemo

elt93

effectivement, la méthode de cirec est beaucoup plus rapide, mais les deux fonctionnent parfaitement !
mercredi 7 mai 2008 à 20:59:48 | Re : Récuperer derniere ligne d'un tmemo

cirec

Membre Club Administrateur CodeS-SourceS
personne n'a dit qu'elle ne fonctionnait pas mais il passe inutilement par deux intermédiaire ... une première par le disque et la deuxième par la StringList.
 
@+
Cirec



Cette discussion est classée dans : ligne, récuperer, derniere, tmemo


Répondre à ce message

Sujets en rapport avec ce message

TMemo, ligne active [ par stailer ] Salut tout le monde,J'aimerais savoir, sur un TMemo, comment connaitre la ligne sur laquelle mon curseur se trouve.Par exemple j'ai un memo comme ca : récuperer les enregistrement d'une ligne dans une nouvelle formulaire [ par djejja ] Salut, Je suis en cours de realiser une application avec Delphi  2005 et une base sur Paradox7 J'ai un BDGrid qui contient tous les enregistrements d Supprimer la derniere ligne d'un txt [ par pascal57 ] bonjour tous et a l'avance merci de votre aide.Mon probleme est simple j'écris dans un fichier txt sans probleme je l'enregistre je le lis.Mais j'aime Selection Verticale dans une TMemo [ par PsykopatSncf ] Salut,j'appel au secours les joyeux developpeurs.En effet je cherche a contrer la réaction d'une opération de sélection de texte dans un Tmemo.Lorsque [Tmemo] une action celon la ligne? [ par molotof_FC ] salut a tous,je souhaiterais dans un memo, definir l'action a faire selon la ligne.ou encore, ce qui revient au meme, copier qu'une seul ligne d'un me contenu Memo sauvegarder ligne par ligne [ par shell13010 ] Bonsoir a tous et a toute, J'aimerais savoir comment je pourrais procéder pour que lorsque j'écrit un mot dans un Tmemo il le sauvegarde en fichier. Delphi Imprimer avec qReport [ par jeanmi59260 ] Bonjour, Y aurait-il un tutoriel (ou exemple) pour créer un état sous delphi qui gère des regroupements (façon Ms access) Les états que j'essaie de cr Probleme de cryptage Memo ne crypt que 6 ligne [ par PythonGreg ] Bonjour je suis débutant en delphi En crypten le memo il ne crypt que 6 ligne sur 50 ligne ou plus Memo1.Text := CryptDeCrypt (Memo1.Text, 1245) j'a quiqreport et base de données [ par sharifcrd ] sharif je suis vraiment bloqué a cause de quiqreport j'ai une bdd et j'aimerai bien imprimer son contenu sous form d'1 tableau (liste) exmple NOM ligne frame-relay [ par ada_azoul ] Bonjour à touses ce que qlq peut m'esxpliquer cecila connexion des 2 sites est par le biais d'une ligne frame-relay. merci


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,624 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales