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 Hej Satt och laborerade lite och fick detta till att fungera... 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??? Hej det jag ska göra är ett program som tar ett Screenshot, vad ska man använda stället för TextFile då? Hej Micke!Om fil finns
snälla hjälp mig
\\MickeSv: Om fil finns
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
DSSv: Om fil finns
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...
/StaffanSv: Om fil finns
\\MickeSv: Om fil finns
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
SvenSv: Om fil finns
\\MickeSv: Om fil finns
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