Avatar billede gravbamzula Nybegynder
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!
Avatar billede morten_s Nybegynder
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;
Avatar billede morten_s Nybegynder
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);
Avatar billede ziron Nybegynder
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
Avatar billede morten_s Nybegynder
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) + \'?\'), [])
Avatar billede ziron Nybegynder
06. september 2001 - 14:50 #5
og du skal lige tilføje shellapi til uses..

/ZIRON
Avatar billede morten_s Nybegynder
06. september 2001 - 14:50 #6
Ziron> i dag var jeg hurtigst *GGG*
Avatar billede ziron Nybegynder
06. september 2001 - 14:51 #7
marten_s >> iiiiii ja men jeg gav det første eks. lige til at smide ind :-)

/ZIRON
Avatar billede ziron Nybegynder
06. september 2001 - 14:51 #8
og det var morten der skulle stå :-)

/ZIRON
Avatar billede ziron Nybegynder
06. september 2001 - 14:55 #9
gravbamzula >> bare sig hvis du ikke kunne lide mit svar :-)

morten_s >> hvad laver du endelig???

/ZIRON
Avatar billede gravbamzula Nybegynder
06. september 2001 - 14:59 #10
Til Ziron...

Undskyld men det var meningen at jeg skulle godkende begge men den smuttede!!
Avatar billede ziron Nybegynder
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
Avatar billede gravbamzula Nybegynder
06. september 2001 - 15:02 #12
Jep Tak
Avatar billede ziron Nybegynder
06. september 2001 - 15:03 #13
så er det bare alletides...

morten sover du???

/ZIRON
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester