Delphi-PRAXiS - Delphi Prozesse mit richtigen Namen in Listbox

Hallo,

ich habe ein Problem. Ich lese die laufenden Prozesse aus und schreieb sie in eine Listbox. nur mit den teilweise kryptischen abkürzungen kann nicht jeder was anfangen. wenn ich mein Programm nun weitergebe kann vielleicht niemand etwas damit anfangen.

Meine Frage ist also ob es eine möglichkeit gibt, diese abkürzungen irgendwie zu konvertieren unbd den richtigen namen anzuzeigen. Ich habe es schon mit folgendem versucht:

Delphi-Quellcode:

			.

.

.

if ListBox1.Items[i] = 'ICQLite.exe' then  ListBox1.Items[i] := 'ICQ Lite';

if ListBox1.Items[i] = 'avant.exe' then  ListBox1.Items[i] := 'Avant Browser';

if ListBox1.Items[i] = 'explorer.exe' then  ListBox1.Items[i] := 'Explorer';

if ListBox1.Items[i] = 'iexplporer.exe' then  ListBox1.Items[i] := 'Microsoft Internet Explorer';

if ListBox1.Items[i] = 'winamp.exe' then  ListBox1.Items[i] := 'Nullsoft Winamp';

if ListBox1.Items[i] = 'winampa.exe' then  ListBox1.Items[i] := 'Winamp Agent';

if ListBox1.Items[i] = 'taskmgr.exe' then  ListBox1.Items[i] := 'Windows Taskmanager';

if ListBox1.Items[i] = 'msmsgs' then  ListBox1.Items[i] := 'Microsoft Messenger';

if ListBox1.Items[i] = 'outlook.exe' then  ListBox1.Items[i] := 'Microsoft Outlook';

if ListBox1.Items[i] = 'winword.exe' then  ListBox1.Items[i] := 'Microsoft Word';

if ListBox1.Items[i] = 'daemon.exe' then  ListBox1.Items[i] := 'Daemon Tools';

.

.

.

doch das problem dabei ist das der Text GENAU so sein muss wie der prozess, also auch groß und kleinschreibung, außerdem kann ich nicht alle möglichen prozesse so aufschreiben.
Wird zusammen mit den Prozessen nicht irgendwo der richigte name der Anwendung gespeichert den ich einfach auslesen kann, und wenn ja, wie geht das?

Danke schon mal im vorraus

Gruß DaOki