06. september 2001 - 14:44
Der er
12 kommentarer og 1 løsning
Check fil!
Jeg har meget hurgtigt brug for en funktion der kan tjekke om en fil findes inden den åbnes. F.eks Hvis jeg trykker på en knap så skal filen: test.txt åbnes, men kun hvis den findes! ellers så skal den komme med en messagebox med en definerbar fejl meddelse!
Annonceindlæg fra Barco
06. september 2001 - 14:47
#1
if FileExists(AVars.BgPic) then begin //gør noget end else begin MessageDlg((\'Baggrundsbillede: \' +CFile_Not_Found), mtWarning, [mbOK], 0); end;
06. september 2001 - 14:48
#2
Eller eks. fra Delphi if FileExists(FileName) then if MessageDlg(\'Do you really want to delete \' + ExtractFileName(FileName) + \'?\'), []) = IDYes then DeleteFile(FileName);
06. september 2001 - 14:49
#3
if fileExists(\'c:\\test.txt\') = true then begin ShellExecute(Handle, \'OPEN\', PChar(\'c:\\test.txt\'), nil, nil, SW_SHOW); end else begin Application.MessageBox(PChar(\'hej\'), PChar(\'hej\'), MB_OK or MB_ICONEXCLAMATION); end; /ZIRON
06. september 2001 - 14:50
#4
Til dit eks vil det se sådan her ud if not FileExists(FileName) then MessageDlg(\'Ku\' ik\' finde filen \' + ExtractFileName(FileName) + \'?\'), [])
06. september 2001 - 14:50
#5
og du skal lige tilføje shellapi til uses.. /ZIRON
06. september 2001 - 14:50
#6
Ziron> i dag var jeg hurtigst *GGG*
06. september 2001 - 14:51
#7
marten_s >> iiiiii ja men jeg gav det første eks. lige til at smide ind :-) /ZIRON
06. september 2001 - 14:51
#8
og det var morten der skulle stå :-) /ZIRON
06. september 2001 - 14:55
#9
gravbamzula >> bare sig hvis du ikke kunne lide mit svar :-) morten_s >> hvad laver du endelig??? /ZIRON
06. september 2001 - 14:59
#10
Til Ziron... Undskyld men det var meningen at jeg skulle godkende begge men den smuttede!!
06. september 2001 - 15:00
#11
gravbamzula >> jaja det siger de alle sammen :-) hehe nej det er bare iorden. har du fået det til at virker???? /ZIRON
06. september 2001 - 15:02
#12
Jep Tak
06. september 2001 - 15:03
#13
så er det bare alletides... morten sover du??? /ZIRON
Kurser inden for grundlæggende programmering