Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#9

Re: Dateinamen vergeben (ansteigend)

  Alt 3. Apr 2005, 19:05
Zitat von 3_of_8:
Wenn man die führenden Nullen angeben will, muss man noch folgendes machen:

Delphi-Quellcode:
const prefix='JPG'
      stellen=3

...

zahlstr:=inttostr(zahl);
for I:=1 to stellen-length(zahlstr) do
zahlstr:='0'+zahlstr;
//Und dann noch:
dateiname:=prefix+zahlstr;
Delphi-Referenz durchsuchenFormat.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat