2 zahlen in edit feldern tauschen

[grenzgaenger]

Zitat von double_slash:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
        var a, b: Integer;
        begin
        a := IntEdit1.Value;
        b := IntEdit2.Value;
        tausche(a, b);
        IntEdit1.Value := a;
        IntEdit2.Value := b;
        end;

also deinen code, würd ich in etwa so umschreiben..

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var temp: string;
begin
 temp := IntEdit1.text;
 IntEdit1.text := IntEdit2.text;
 IntEdit2.text := temp;
end;

denn, du hast hier gar keinen int... sondern nur text... das hoch- und runter konvertieren kannste dir sparen.