![]() |
Substring Problem
Also mein Problem ist folgendes:
Ich wollte eine kleine IRC Applikation schreiben, doch leider ist in INDY 10 ja die Komponente nicht wirklich fertig, daher musst ich mir eine eigene Prozedure schreiben die eine Liste der Nicks erstellt. Dies ist der momentane Code:
Delphi-Quellcode:
Jetzt ist es so in der Raw Message sieht das so aus:
procedure Tform2.list;
var i1, i2: Integer; s: String; begin i1 := Pos('355', Memo2.Lines.Text); i2 := Pos('366', Memo2.Lines.Text); inc(i1, 3); inc(i2, -3); s := Copy(Memo2.Lines.Text, i1, (i1-i2)); showmessage(s); //bla bla end;
Delphi-Quellcode:
Deswegen wollte ich den Teil zwischen den Zahlen kopieren, und dann den vorderen Teil löschen, um es anschließend auf eine Listbox zu übertragen.
353 Testnick = #Königlich-Preußisches-Inf.Reg :Testnick ~PhilmacFLy
366 Testnick #Königlich-Preußisches-Inf.Reg :End of /NAMES list. Leider wird schon in der showmessage nix angezeigt. Leider hab ich im Moment keine Ahnung woran es liegt. |
Re: Substring Problem
Versuch es mal mit (i2 - i1)
|
Re: Substring Problem
Zitat:
|
Re: Substring Problem
erstmal 355 <> 353
und das mit i2-i1 wurde ja schon gesagt |
Re: Substring Problem
Jetzt wird mir die komplette Raw message angezeigt.
@DeddyH: Ganz am schluss sollen nur die Nicks in die Listbox. Im moment will ich damit nur bezwecken dass: Testnick = #Königlich-Preußisches-Inf.Reg :Testnick ~PhilmacFLy Stehen bleibt. Und ja da is ein Zeilen Umbruch drinne, |
Re: Substring Problem
Zitat:
Btw Was willst due den geanu extrahieren? |
Re: Substring Problem
Genau will ich nur die nicks also:
Testnick ~PhilmacFLy |
Re: Substring Problem
Und die Zeilen sehen immer so aus?
|
Re: Substring Problem
immer, bis auf das da halt noch mehr nicks hin kommen können.
|
Re: Substring Problem
Handelt es sich hier um 1 oder 2 Nicks? Wenn einer, belegt der dann immer 2 Zeilen?
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:23 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz