CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

begin process at 2012 02 11 09:41:27

Accueil Codes Tutoriels Forum Livres Emploi Services Connexion

Trouver un code source :

dans

[ Dernières recherches ]

Accueil > Forum >

Récuperer derniere ligne d'un tmemo

Poser 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

26 msg

44 msg CS

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

3427 msg

3627 msg CS

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

2792 msg

2878 msg CS

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

1430 msg

1515 msg CS

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

3427 msg

3627 msg CS

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

1430 msg

1515 msg CS

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

3427 msg

3627 msg CS

merci Julio

cantador

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

elt93

26 msg

44 msg CS

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

2792 msg

2878 msg CS

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

Livres en rapport

Bien écrire pour le web

e-Markets

Kit d'initiation au e-commerce

Graphisme et ergonomie des sites Web

Tous les livres pour Ligne, Récuperer, Derniere, Tmemo

Nos sponsors

Derniers Blogs

[TECHDAYS 2012] SESSION WEBMATRIX 2 : LE COUTEAU SUISSE GRATUIT POUR VOS DéVELOPPEMENTS WEB - SLIDES par gpommier

[SHAREPOINT] LES SESSIONS TECHDAYS 2012. par Patrick Guimonet

TECHDAYS PARIS 2012 : SESSION PLEINIèRE JOUR 3 par ROMELARD Fabrice

MISHRA READER : UN LECTEUR RSS TRèS ZUNE STYLE EN OPEN SOURCE ! par Vko

[FRAMEWORK 4] LES TASKS ET LE THREAD UI par fathi

Forum

RE : UTILISATION DES RADIOBUTTON par pierrotk10d

CONNEXION ABSOLUTE DATABASE par ofi

UTILISATION DES RADIOBUTTON par yapess

RE : TRANSMISSION ADRESSE FONCTION à UNE DLL par WhiteHippo

RE : "APPEL" QUI PLANTE ET "FILTRAGE" QUI BLOQUE!!! par cantador

Côté IT

Offres d'emploi

Formations Video

Appels d'offres

Passerelle Pericles sur site Joomla 17
Budget : 499€
Infogerance Serveur Debian Linux
Budget : 2 400€
Developpeur applications iphone - ipad - android
Budget : 800€

Logiciels

Academy System (17.2.1.0)
ACADEMY SYSTEM (17.2.1.0)

Logiciel de gestion des établissements. - élèves/étudiants (inscription, dossier, absence...) -...

Cliquez pour télécharger Academy System
Easy-Planning (1.0.0.1)
EASY-PLANNING (1.0.0.1)

Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ...

Cliquez pour télécharger Easy-Planning
COLLECTOR PLUS (3.00B)
COLLECTOR PLUS (3.00B)

COLLECTOR PLUS version 3.00B est un logiciel utilisant une base de données alimentée par : - L...

Cliquez pour télécharger COLLECTOR PLUS
PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)
PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)

PONAMEDIA TV DEVIENS HELLLOOO FLASH LA TV SUR VOTRE ORDINATEUR. Toute une plateforme Multi...

Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO
LettresFaciles 2011 (8.0.0.1)
LETTRESFACILES 2011 (8.0.0.1)

LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types. Son inte...

Cliquez pour télécharger LettresFaciles 2011