Versions abfrage Problem!

[generic]

Zitat:

Zitat von danu1104

Delphi-Quellcode:

     if i < 10 then
     begin
      Label2.Caption:=RemoteVer+'/0.00'+IntToStr(i);
      download(H+'/'+D+'/'+vers+'/'+'0.00'+IntToStr(i)) end else
     if i > 9 then
     begin
      Label2.Caption:=RemoteVer+'/0.0'+IntToStr(i);
      download(H+'/'+D+'/'+vers+'/'+'0.0'+IntToStr(i)) end else
     if i > 99 then
     begin
      Label2.Caption:=RemoteVer+'/0.'+IntToStr(i);
      download(H+'/'+D+'/'+vers+'/'+'0.'+IntToStr(i)) end

Das nennt man Code Duplizierung und ist schlecht.
Kennt ihr den Format Befehl nicht?
Damit können die 3 Ifs auf 0 zusammen kürzen.