Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Jul 2009
Jetzt hab ich mir 3 mal die Brille geputzt, aber immer noch nichts gefunden. Gut, dann mal in der Langform:try
for i := 0 to Pred(ListBox2.Items.Count) do
begin
s := ListBox2.Items;
iPos := Pos('=', s) + 1; //iPos: integer
s := Copy(s, iPos, Length(s)); //hier ist der Fehler, sorry, hab das s vergessen
Listbox2.Items := s;
end;
finally
...
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Jul 2009
Was soll da inkompatibel sein? Hab ich was übersehen?
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
27. Jul 2009
var s: string;
i: integer;
begin
ListBox1.Items.BeginUpdate;
try
for i := 0 to Pred(ListBox1.Items.Count) do
begin
s := Copy(Pos('=',ListBox1.Items) + 1, Length(ListBox1.Items));
ListBox1.Items := s;
end;