Einzelnen Beitrag anzeigen

Molzer

Registriert seit: 7. Dez 2008
70 Beiträge
 
#1

Brauche Bitte Erklärung für Sortierbefehl!

  Alt 8. Jan 2009, 20:29
Hallo !!

Hab hier einen Text und verstehe leider ein paar Zeilen nicht


Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
var
  i: Integer;
  j: Integer;
  temp:string;
begin
for i := 0 to memo1.Lines.Count - 1 do //warum -1, er nimmt für i die erste zahl und für j
                                       // die zweite, tauscht sie aus wenn nötig
for j := i to memo1.Lines.Count - 1 do //und das solange bis j>i, warum -1???
begin
  if memo1.Lines[i]>memo1.Lines[j] then
  begin
    temp:=memo1.lines[i];
    memo1.Lines[i]:=memo1.lines[j];
    memo1.Lines[j]:=temp;
Meine Version:
Borland® Delphi® für Microsoft® Windows™ Version 10.0.2288.42451 Update 2 Copyright © 2005 Borland® Software Corporation.
  Mit Zitat antworten Zitat