TImage problem

0

Mam maly problemik z Timage w programie jesli jest plik uzytkownika to jest on ladowany :
if FileExists('c:\windows\tapeta.jpg') then Form1.Image1.Picture.LoadFromFile('c:\windows\tapeta.jpg');
ale jesli go nie ma to ma zostac uzyty ten defaultowy ktory jest wklepany w zasobach.
Jesli program uruchomimy a nie bedzie pliku c:\windows\tapeta.jpg to wyswietli sie ten wklepany w kod jesli bedzie jednak to zostanie wyswietlony z pliku a co zrobic jesli nagle zabraklo tego pliku a chce wyswietlic ten delfalutowy ? czyli
if FileExists('c:\windows\tapeta.jpg') then Form1.Image1.Picture.LoadFromFile('c:\windows\tapeta.jpg') else ???

dzieki za pomoc
pozdrawiam

0

Można tak:

try 
if FileExists('c:\windows\tapeta.jpg') then Form1.Image1.Picture.LoadFromFile('c:\windows\tapeta.jpg') 
except
Form1.Image1.Picture.LoadFromFile('c:\windows\costam.jpg') 
0
Case FileExists(Nazwa pliku) OF
 True  : Image1.Picture.LoadFromFile(Nazwa pliku);
 False : Image1.Picture.BitMap.LoadFromResource(HInstance, 'Nazwa zasobu');
End;

(Z glowy)

1 użytkowników online, w tym zalogowanych: 0, gości: 1