получение имени текущего процесса

[S/-#092;#124;-#124;ek]

получение имени текущего процесса. Подскажите как реализовать

 

[Great]

S/-|-|ek
Я не знаю, какой ЯП тебе нужен, так что пишу на Си:

#include <windows.h>
#include <stdio.h>
#include <tlhelp32.h>

char* GetCurrentProcessName()
{
	unsigned int pid=GetCurrentProcessId();

	HANDLE m_Snap = INVALID_HANDLE_VALUE;
	PROCESSENTRY32 pe = {sizeof(pe)};
	m_Snap = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,NULL);

	if (m_Snap == INVALID_HANDLE_VALUE) return NULL; 
	if (!Process32First(m_Snap, &pe)) return NULL;
	do if(pe.th32ProcessID==pid) 
   {
    return strdup(pe.szExeFile);
   }
	while (Process32Next(m_Snap, &pe)); 

	return NULL;
}


int main(int argc, char** argv)
{
	printf("CURRENT PROCESS: %s\n", GetCurrentProcessName());
	return 0;
}

Функа GetCurrentProcessName() выполняет требуемое действие

 

[S/-#092;#124;-#124;ek]

Great
Спасибо за помощь.

 

[BUG(O)R]

GetModuleFileName

 

[S/-#092;#124;-#124;ek]

а на Delphi ?? заранее благодарен

 

[Great]

S/-|-|ek
а в дельфи WinAPI отличается? :crazy: