"doppelten code" vermeiden?

[himitsu]

Mir währe die 1. Variante auch lieber

Zitat:

wo hab ich denn "Pos('', params)" stehen?

Code:

      begin 
        Delete(params, 1, Pos(':', params)+1); 
        Trim(params); 
        while params <> '' do 
        begin 
          if Pos(' ', params) > 0 then 
          begin 
            ...
          end 
          else 
          begin 
            ...
            NickInfo[high(NickInfo)].LongIP := Copy(params, 1, [color=red]Pos('', params)[/color]-1); 
            Delete(params, 1, [color=red]Pos('', params)[/color]); 
          end; 
        end; 
      end;