Programmpfad anderer Programme ermitteln

[Chrischi]

Hab's schon:

Delphi-Quellcode:

try
  sDisplayName     := Reg.ReadString('Comments');
  sUninstallString := Reg.ReadString('InstallLocation');
  if sDisplayName <> '' then
  begin
     if sDisplayName = 'Mozilla Firefox' then
       begin
         ListItem := Listview1.Items.Add;
         ListItem.Caption := sDisplayName;
         ListItem.subitems.Add(sUninstallString);
         ShowMessage (sUninstallString);
     end;
   end;
finally
  Reg.CloseKey;
end;

Danke an alle für die Hilfe!!!

[toms]

if sDisplayName = 'Mozilla Firefox' then Hallo, bei dieser Überprüfung wird aber z.B 'Mozilla Firefox (....)' nicht erkannt.
Verwende Pos, um 'Mozilla Firefox' als Teilstring zu erkennen.

[Chrischi]

Doch, das erkennt er...

Aus einem ganz einfachen Grund - der Wert von "Comments" von Firefox ist schlicht und einfach "Mozilla Firefox". Egal welche Version. (Bei mir zumindest - hab Firefox 3.0 und Firefox 3.0.1 und bei beiden ist das so.)

Gruß,
Chrischi