Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  Hab ich doch hier schon gepostet (in diesem Thema)
  
  min=i habe ich noch verändert.
  
  Das heißt min also keinen Wert sondern einen Index zuweisen,
  wie bei
  
  min=j auch geschieht.
  
  Da ich mir den ganzen Grafikkram nicht angeschaut habe könnte
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  Guck dir alles nochmal genau an!!!!!!
  
  Es geht hier um das Durchmischen von Index und Werten.
  
  Lass dir am besten den Array in einer Listbox oder so ausgeben,
  um sicher zu gehen, dass das Array richtig sortiert ist.
  
  Ich habe NICHT NUR ein kleiner/größerzeichen verändert!
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  doch ich glaub ich blicke es !
  
  Mein letzter Code nimmt die entsprechenden Änderungen vor !
  
  Dann ist es auch egal wie die Ausprägung der Werte ist.
  
  Statt
  
  If recsize2 <> recsize2 Then Begin
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  das kann nicht gewollt sein.
  
  Stell dir vor der Balken hat die Länge 250 und dein Array/Balken geht nur bis 100 !
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  For i := 1 To BalkenZahl - 1 Do Begin
  min := i;
  
  Application.Processmessages;
  
  For j := i + 1 To BalkenZahl Do Begin
  Application.Processmessages;
  
  If recsize2<recsize2 Then min:=j;
  End;
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  Also vielleicht blick ich es auch nicht ganz aber...
  
  du verwendest min mal als index mal als Vergleichsgröße !
  
  mit
  
  min=recsize;
  
  weist du min die Länge des Balkens an Position i zu.
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  natürlich willst du da was ermitteln :shock:
  
  Willst du nicht eigentlich das kleinste Element suchen und an die Position i setzen?
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  For i := 1 To BalkenZahl - 1 Do Begin
  min := recsize2;
  Application.Processmessages;
  
  For j := i + 1 To BalkenZahl Do Begin
  Application.Processmessages;
  
  If recsize2 < recsize2 Then min := j;
  End;
  ...
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  siehe Edit oben
• Forum: Programmieren allgemein

  Re: Auswahlsort

   
    by Minz, 5. Jan 2004
  Moin,
  
  schonmal was von Einrücken gehört? Soll nicht bös gemeint sein, wäre aber etwas hilfreicher beim Lesen!
  
  wenn ich das richtig verstehe, sortierst du das Array recsize2 ?
  
  dann macht die Zeile
  recsize2:=index
  
  irgendwie wenig Sinn :gruebel: