Avanceret StringReplace

Hej,

Lad mig først fortælle om 2 listboxe. De har samme antal items. Item[0] i den ene hører sammen med Item[0] i den anden på den måde, at Item[0] i den første fx kan være 'navn1' og Item[0] i den anden kan være 'navn1 (og noget mere)'. Det er grundlæggende for alle items i de to listboxe, at de hører sammen som par. De items i listbox2 har altså bare noget mere tekst bagved navnet.

Disse to listboxe vender vi lige tilbage til.
Det skal lige nævnes, at der findes en eksakt kopi af listbox1 som vi vælger at kalde listbox3.

Jeg har en combobox (NamesMenu) som indeholder nogle af brugeren udvalgte elementer fra listbox1. Når brugeren har smidt disse over i comboboxen så forsvinder de fra listbox1 (sådan skal det være).

Lad os nu antage, at elementerne i comboboxen er 'navn3', 'navn4', 'navn8', 'navn15'.

Jeg har følgende kode:


  for i := 0 to NamesMenu.Items.Count - 1 do
  begin
    if NamesMenu.ItemIndex = i then
    begin
      tekst[i] := name[i];
    end;


"name" er defineret således:
name := NamesMenu.Items[i];

og "tekst" har ingen indflydelse nu her.


Altså - 'navn3' er name[0], 'navn4' er name[1], 'navn8' er name[2] og 'navn15' er name[3].


Nu skal det være sådan, at 'navn3', altså element 2 i listbox1, skal udskiftes til 'navn3 (og blablabla)', dvs. element 2 i listbox2. Sådan skal det foregå med alle items i NamesMenu.

How?


Håber ikke det virker for uoverskueligt alt det jeg har skrevet.