Hvordan får jeg Delphi til at søge?

Hej allesammen hvordan får jeg Delphi til at søge efter en fil?
fx. jeg vil gerne have Delphi til at søge efter IEXPLORE.EXE og starte den bagefter hvordan gør jeg det? På fårhånd Tak

Hvis det er noget med filsøgning, så kommer her lige noget (fra hoften) :

//Returnerer stien+filnavnet på den først fundne fil der passer (wildcards virker fint her)
procedure FindFile(DirectoryToSearch, Filemask : String; Recurse : Boolean = True) : String;
var
SR : TSearchRec;
TempRes : String;
begin
Result := '';

if DirectoryToSearch[length(DirectoryToSearch)] <> '\\' then
DirectoryToSearch := DirectoryToSearch + '\\';

if FindFirst(DirectoryToSearch + Filemask, faAnyfile, SR) = 0 then
begin
if FileExists(DirectoryToSearch + SR.Name) then
Result := DirectoryToSearch + SR.Name;
end
FindClose(SR);

if Recurse then
begin
if FindFirst(DirectoryToSearch + '*.*', faDirectory, SR) = 0 then
begin
if (SR.Name <> '.') and (SR.Name <> '..') and (DirectoryExists(DirectoryToSearch + SR.Name) then
TempRes := FindFile(DirectoryToSearch + SR.Name, FileMask, True);
if TempRes <> '' then
begin
Result := TempRes;
Exit;
end;

while FindNext(SR) = 0 then
begin
if (SR.Name <> '.') and (SR.Name <> '..') and (DirectoryExists(DirectoryToSearch + SR.Name) then
TempRes := FindFile(DirectoryToSearch + SR.Name, FileMask, True);
if TempRes <> '' then
begin
Result := TempRes;
Exit;
end;

FindClose(SR);
end;
end;
end;



...dette er et rent skud fra hoften, og på ingen måde testet af.... :-)

Mvh.
Bargmann

Hej allesammen hvordan får jeg Delphi til at søge efter en fil?
fx. jeg vil gerne have Delphi til at søge efter IEXPLORE.EXE og starte den bagefter hvordan gør jeg det? På fårhånd Tak

Der findes en relativ nem måde at starte internet Explore på
F.eks

uses ShellAPI;

procedure RunIE;
begin
ShellExecute(GetDeskTopWindow, 'open', 'www.minhjemmeside.dk', nil, nil. SW_SHOW);
end;

Så der er ikke nogen grund til at søge efter iexplore.exe. Hvis opgaven bare er at starte Internet explorer.

Håber det er svar nok ellers må du jo prøve at skrive igen.