AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Hilfe mit Parsen

Ein Thema von Bernd29bln · begonnen am 7. Apr 2005 · letzter Beitrag vom 7. Apr 2005
Antwort Antwort
Bernd29bln

Registriert seit: 28. Feb 2005
Ort: Berlin
281 Beiträge
 
Delphi 7 Professional
 
#1

Hilfe mit Parsen

  Alt 7. Apr 2005, 21:53
Hallo,

Hab mir einen code gebastelt der einen Text aus einet txt parsen tut. Er Funcktioniert, sehr gut nur leider in einem memo wie bekomme ich die Texte in eine Listview die den style report hat untereinander.
Delphi-Quellcode:
 while (pos('harf="', s)>0) do
    begin


  a:=pos('harf="', s)+11;
  delete(s, 1, a);
  a:=pos('"', s);
  s2.Add( copy(s, 1, a-1) );
   end;
   Memo1.Lines.Text:=s2.Text;
   s2.free;
   ListItem := Form1.ListView1.Items.Add;
   ListItem.Caption := memo1.Lines.Text;
end;
gruss
Bernd
Es ist keine Schande, nichts zu wissen, wohl aber, nichts lernen zu wollen.
Sokrates
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#2

Re: Hilfe mit Parsen

  Alt 7. Apr 2005, 21:56
Mit ListView.Items.Add erstellt man ein Item in einer Listview. diesem Item kannst du dann eine neue caption zuordnen. Oder alles in einem
  ListView.Items.Add.Caption := 'Deine Caption die Vorher eine Zeile im Memo war';
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Bernd29bln

Registriert seit: 28. Feb 2005
Ort: Berlin
281 Beiträge
 
Delphi 7 Professional
 
#3

Re: Hilfe mit Parsen

  Alt 7. Apr 2005, 22:01
Wie kann ich den den code umbauen das es gleich in die Listview geht.


Gruss
Bernd
Es ist keine Schande, nichts zu wissen, wohl aber, nichts lernen zu wollen.
Sokrates
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#4

Re: Hilfe mit Parsen

  Alt 7. Apr 2005, 22:03
Delphi-Quellcode:
var i: Integer;
begin
  for i := 0 to Memo1.Lines.Count - 1 do
    ListView1.Items.Add.Caption := Memo1.Lines.Strings[i];
(untested)
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Bernd29bln

Registriert seit: 28. Feb 2005
Ort: Berlin
281 Beiträge
 
Delphi 7 Professional
 
#5

Re: Hilfe mit Parsen

  Alt 7. Apr 2005, 22:06
Danke SirThornberry,

Funcktioniert super.

Gruss
Bernd
Es ist keine Schande, nichts zu wissen, wohl aber, nichts lernen zu wollen.
Sokrates
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:09 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz