Delphi-PRAXiS
Seite 1 von 4  1 23     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Substring Problem (https://www.delphipraxis.net/138967-substring-problem.html)

PhilmacFLy 20. Aug 2009 19:41


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:
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;
Jetzt ist es so in der Raw Message sieht das so aus:
Delphi-Quellcode:
353 Testnick = #Königlich-Preußisches-Inf.Reg :Testnick ~PhilmacFLy
366 Testnick #Königlich-Preußisches-Inf.Reg :End of /NAMES list.
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.

Leider wird schon in der showmessage nix angezeigt.
Leider hab ich im Moment keine Ahnung woran es liegt.

mkinzler 20. Aug 2009 19:47

Re: Substring Problem
 
Versuch es mal mit (i2 - i1)

DeddyH 20. Aug 2009 19:48

Re: Substring Problem
 
Zitat:

Zitat von PhilmacFLy
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.

:?: Das hab ich nicht ganz verstanden. Was genau soll den von dem geposteten String übrigbleiben? Und ist da ein Zeilenumbruch drin oder sieht das nur so aus?

himitsu 20. Aug 2009 19:49

Re: Substring Problem
 
erstmal 355 <> 353
und das mit i2-i1 wurde ja schon gesagt

PhilmacFLy 20. Aug 2009 20:24

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,

mkinzler 20. Aug 2009 20:28

Re: Substring Problem
 
Zitat:

Und ja da is ein Zeilen Umbruch drinne,
Warum trennst du nicht an diesem?
Btw Was willst due den geanu extrahieren?

PhilmacFLy 20. Aug 2009 20:32

Re: Substring Problem
 
Genau will ich nur die nicks also:
Testnick ~PhilmacFLy

mkinzler 20. Aug 2009 20:35

Re: Substring Problem
 
Und die Zeilen sehen immer so aus?

PhilmacFLy 20. Aug 2009 20:38

Re: Substring Problem
 
immer, bis auf das da halt noch mehr nicks hin kommen können.

mkinzler 20. Aug 2009 20:43

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 20:28 Uhr.
Seite 1 von 4  1 23     Letzte »    

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