AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Hilfe zur Stringlist

Ein Thema von waschlap · begonnen am 23. Jan 2006 · letzter Beitrag vom 23. Jan 2006
Antwort Antwort
Seite 2 von 4     12 34      
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.861 Beiträge
 
Delphi 11 Alexandria
 
#11

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 14:56
Zitat von waschlap:
Also wenn ich sage :

  showmessage(inttostr(wliste.indexOf('Office'))); Kommt lediglich -1 raus obwohl dieses Wort in meiner stringlist steht.

Folgendes steht in dieser Zeile: - Office Kenntnisse

Wenn ich das wie oben steht ausführe bekomme ich echt nur -1 raus.

Verzweifle schön langsam daran, es kann es doch net geben das man das nicht einfach auslesen kann.

Mit Pos versuche ich es gerade aber bin mir nicht sicher ob das klappen wird.

Mfg

Manu
Index sucht auchj nach 'Office' und nicht nach 'Office - Kenntnisse'.
In diesem Fall mußt du wie beschrieben die einzelnen Einträge durchgehen und mit pos überprüfen ob gesuchtes Wort in Eintrag ist.
Markus Kinzler
  Mit Zitat antworten Zitat
Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.771 Beiträge
 
Delphi 10.4 Sydney
 
#12

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 15:05
In dem Fall ist 'Office Kenntnisse' ein String Deiner Stringlist
und IndexOf liefert -1 zurück weil ja der String 'Office Kenntnisse' heißt
und nicht 'Office'. IndexOf sucht nicht nach einer Teilmenge.

Delphi-Quellcode:
 i:=0;
 found:=false;
 while (i <= wslist.count-1) AND NOT found DO
   begin
     if pos('suchstring',wslist[i]) <> 0 then
       found:=true;
     inc(i);
   end;

if found then
   position:=i-1
else
   showMessage('...');
Vielleicht geht es ja so?

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat
23. Jan 2006, 15:05
Dieses Thema wurde von "Sharky" von "Programmieren allgemein" nach "Object-Pascal / Delphi-Language" verschoben.
Ist ja eine Frage zu Delphi
Benutzerbild von freak4fun
freak4fun

Registriert seit: 22. Sep 2004
Ort: Hannover
1.807 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#14

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 15:06
Hallo ,
sowas?

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  for i := 1 to ListBox1.Count - 1 do
    if Pos('office', ListBox1.Items.Strings[i]) <> 0 then
      ShowMessage(IntToStr(i) + ': ' + ListBox1.Items.Strings[i]);
end;
Ist sehr ähnlich dem Beispiel im Vorpost.

MfG
freak
Christian
IT: Schließen Sie bitte das Fenster. User: Die Tür auch?
i++; // zaehler i um 1 erhoehen
  Mit Zitat antworten Zitat
Benutzerbild von TeronG
TeronG

Registriert seit: 19. Jul 2004
Ort: München
960 Beiträge
 
Delphi 2007 Professional
 
#15

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 15:25
Zitat von freak4fun:
Hallo ,
sowas?

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  for i := 1 to ListBox1.Count - 1 do
    if Pos('office', ListBox1.Items.Strings[i]) <> 0 then
      ShowMessage(IntToStr(i) + ': ' + ListBox1.Items.Strings[i]);
end;
Ist sehr ähnlich dem Beispiel im Vorpost.

MfG
freak
Netter Code .. funtzen auch (das mit dem durchlaufen der gesammten liste) aber warum benutzt du/ihr nicht .IndexOf('blub') ist doch schöner zu Handeln
龍 Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie.
  Mit Zitat antworten Zitat
Benutzerbild von freak4fun
freak4fun

Registriert seit: 22. Sep 2004
Ort: Hannover
1.807 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#16

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 15:30
Zitat von TeronG:
Netter Code .. funtzen auch (das mit dem durchlaufen der gesammten liste) aber warum benutzt du/ihr nicht .IndexOf('blub') ist doch schöner zu Handeln
So weit ich das verstanden hab, greift .IndexOf('office') hier nicht:
Zitat:
asdf
- office anwendung
heimatort
:: office?
was auch immer
MfG
freak
Christian
IT: Schließen Sie bitte das Fenster. User: Die Tür auch?
i++; // zaehler i um 1 erhoehen
  Mit Zitat antworten Zitat
waschlap
(Gast)

n/a Beiträge
 
#17

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 15:35
Weil ich nur einen Teilstring suche und das funzt net mit indexof.


Mfg
Manu
  Mit Zitat antworten Zitat
Benutzerbild von 3_of_8
3_of_8

Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
 
Turbo Delphi für Win32
 
#18

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 15:37
Wie wärs mit memo1.text:=stringreplace(memo1.text,'wort1','wort 1wort2',[srReplaceAll]);?
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
  Mit Zitat antworten Zitat
waschlap
(Gast)

n/a Beiträge
 
#19

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 15:42
Erstmal danke für eure Hilfe, ich bin mittlerweile soweit, dass er mir die richtige stelle über ein showmessage ausgibt. Nur wenn ich die ganze Sache einfügen will sprich:

Delphi-Quellcode:

If Pos(' ', wliste.text) > 0 then
         test:= Pos('Office', wliste.text);
wliste.inert(test,'keine ahnuge');
schreibt er es mir in zeile 52 weil test = 52 entspricht.

Wie kann ich jezt sagen das er es an Zeichenstelle 52 es hineinschreibt??

Mfg
Manu
  Mit Zitat antworten Zitat
Benutzerbild von freak4fun
freak4fun

Registriert seit: 22. Sep 2004
Ort: Hannover
1.807 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#20

Re: Hilfe zur Stringlist

  Alt 23. Jan 2006, 15:44
Zitat von 3_of_8:
Wie wärs mit memo1.text:=stringreplace(memo1.text,'wort1','wort 1wort2',[srReplaceAll]);?
Was hat das mit der Stringliste zu tun?

MfG
freak
Christian
IT: Schließen Sie bitte das Fenster. User: Die Tür auch?
i++; // zaehler i um 1 erhoehen
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 4     12 34      


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 15:27 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