Código Delphi [-] var i: Integer; begin for i:= 1 to 10 do ListBox1.Items.Add(Copy(VStr[i],Pos(' ', VStr[i])+1, MaxInt)); ... end;
var i: Integer; begin for i:= 1 to 10 do ListBox1.Items.Add(Copy(VStr[i],Pos(' ', VStr[i])+1, MaxInt)); ... end;