Einzelnen Beitrag anzeigen

Benutzerbild von Zacherl
Zacherl

Registriert seit: 3. Sep 2004
4.629 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#26

AW: Listbix1 eintragungen in Listbox2 Übertragen per Array

  Alt 20. Dez 2012, 12:36
Jetzt hast du aber nicht deine Aufgabenstellung beachtet (Integer Array verwenden). Dein "Arr" ist doch ein Array of String. Die Lösung, die ich angedacht hatte ist folgende:

Delphi-Quellcode:
var
  A: array of Integer;
  I: Integer;
begin
  // Schritt 1: Größe des Arrays der Länge der ListBox1 anpassen
  SetLength(A, ListBox1.Items.Count);
  // Schritt 2: Alle Elemente der ListBox1 ins Array kopieren
  for I := 0 to ListBox1.Items.Count - 1 do
  begin
    A[I] := StrToInt(ListBox1.Items[I]);
  end;
  // Schritt 3: Alle Elemente des Arrays in ListBox2 kopieren
  for I := Low(A) to High(A) do
  begin
    ListBox2.Items.Add(IntToStr(A[I]));
  end;
end;
Ich gehe mal davon aus, dass der Lehrer euch den Umgang mit StrToInt() und IntToStr() näherbringen wollte. Alles andere würde bei der Aufgabenstellung für mich keinen Sinn ergeben.
Projekte:
- GitHub (Profil, zyantific)
- zYan Disassembler Engine ( Zydis Online, Zydis GitHub)
  Mit Zitat antworten Zitat