Einzelnen Beitrag anzeigen

RedShakal
(Gast)

n/a Beiträge
 
#1

IRC String durch for Schleife erweitern

  Alt 26. Jul 2009, 13:48
Hallo, ich brauche mal bitte einen schnellen Denkanstoß.

Für meinen Map downloader speichere ich zurzeit die Mapliste in einer Ini datei:

Delphi-Quellcode:
[Maplist]
Anzahl=4
1=Test
2=Test
3=Test2
4=Test
Diese sollen im Programm ausgelesen werden, an einen String gehängt werden und anschließend verschickt werden.

Delphi-Quellcode:
if StrArr[0] = 'Maplistthen
    begin
       ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+ 'maplist.ini');
       try
         Anzahl := ini.ReadInteger('Maplist','Anzahl','');
           for i := 1 to Anzahl-1 do
             Maps := ini.ReadString('Maplist',i,'');
             Maps := Maps+'|';


// An dieser Stelle komme ich nicht weiter. Wie hängt man den durch I ermittelten Wert hinten an den String dran? Damit das dann z.b. in den Schema ist: Maplist|Test|Test|Test2|Test ? Diese Werden über einen IRC Befehl an die Clients verschickt und ausgewertet. ( Die Clients reagieren nur wenn der Nickname "Masterserver" und das wort mit "Maplist" anfängt.


       finally
         ini.free;
    end;

Das gleiche Problem haben die Clients dann leider auch. Ich hab mir das so vorgestellt das ich die Map anzahl direkt mitsende z.b. Maplist|4|Test|Test|Test2|Test

Die werden dann durch eine Explode funktion im Programm in die Einzelteile aufgeteilt.

Delphi-Quellcode:
      if (StrArr[0] = 'Maplist') and (AUser.Nick = 'KKND|Masterserver') then
        begin
          Anzahl := StrArr[1];
          for i := 1 to Anzahl-1 do
          Form6.Maplist.Items.Add.Caption := StrArr[i];
        end;
So in etwa hatte ich mir das vorgestellt, weiß aber nicht genau ob das wirklich so richtig ist.
  Mit Zitat antworten Zitat