jag håller på med ett program som sparar en fil på ett ställe men den sparar bara över den gamla filen, nu undrar jag hur man ska göra för att den inte ska skriva över utan plussa på 1 så om fil1 finns så ska den andra filen heta fil2

snälla hjälp mig

\\Micke

Hej
Klart att du skall få hjälp
Det kommer att ta en dag eller mer , det är helg nu.

mvh
Sven
som är glad att se att det blir fler och fler Delphi nix här
DS

Satt och laborerade lite och fick detta till att fungera...

var
SomeTxtFile : TextFile;
buffer : string;
i:integer;

begin
for i := 1 to 10 do begin
if fileExists('c:\Fil' + intToStr(i) + '.txt') = False then

begin
AssignFile(SomeTxtFile, 'c:\Fil' + intToStr(i) + '.txt');
rewrite(someTxtFile);
exit;
end;
end;
end;

end.

Exemplet sträcker sig bara till filnamnet Fil10, men detta kan du ju modifiera efter behov...


/Staffan

tack så mycket...

det är bara en grej till, jag ska spara det i en bmp fil o inte en txt fil, vad ska stå istället för TextFile???

\\Micke

Hej
Du kan ju inte bara spara som .bmp om filen inte har
den strukturen.Har den bmp struktur så är det bara att spara.

tycker och hoppas att jag svarat rätt
Sven

det jag ska göra är ett program som tar ett Screenshot, vad ska man använda stället för TextFile då?

\\Micke

Hej Micke!

Jag hittade en sida med ett exempel på att spara screenshots till en bmp-fil. Lite arbete krävs dock för att implementera exemplet till din nuvarande kod.

Här är länken i alla fall:

http://www.scalabium.com/faq/dct0001.htm

/Staffan