Ście?żki programów

Mam zapisane w pliku "001.txt" ścieżki do programów. Mam program, który otwiera pliki *.exe i na labelu pokazuje ich ścieżkę ,np otwieram Worda i pojawia się program z napisem na labelu;"c:\Program Files\Word\word.exe" Jak sprawdzić czy ta ścieżka jest w pliku "001.txt"?

assignfile(plik);
reset(plik);
REPEAT
readln(plik,slowo);
if jaka tam sciezka=slowo then *jest
else *jeszcze nie ma :)
UNTIL eof(plik);
//koniec :)--eh ah i oh

sorry
var plik:TextFile;
AssignFile(plik,'001.txt');--eh ah i oh