memo text in listview kopieren(text splitten)

omega123 · Beiträge: 16

und schonwieder habe ich ein kleines (großes) problem

in meinem memo stehen folgende texte

(1)192.45.0.78Text
(2)207.80.153.78Text
...
...

die sollen nun in ein listview kopiert werden

also die zahl in der klammer bekomme ich ja noch in meine listview kopiert

und auch gelöscht

aber wie bekomme ich nun die ip und den text auch noch in die listbox?

bitte (leider) mal wieder um hilfe

schonmal danke im vorraus

kiwicht · Beiträge: 1021 Win 7, MacOS Delphi x, VBA, PHP, ...

zeig doch mal den code, mit dem du den kram in die listbox kopierst...

matze · Verfasst: Sa 01.02.03 12:16

ich würd das spontan mal so machen:

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

var temp:integer;
tempstr:string;
begin
for temp := 0 to memo1.lines.count - 1 do begin
tempstr := memo1.lines[temp];
tempstr := copy (tempstr, pos (')',tempstr)+1,Length (tempstr));
listbox1.items.add (tempstr);
end;

_________________
In the beginning was the word.
And the word was content-type: text/plain.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme