Поиск пути к файлу

[aank10]

Нашел кучу примеров про поиск файлов но ни один из них не подходит, одни слишком медленные другие работают как функция и не могу вытащить путь к нему. Может ли кто то дать готовый пример поиск файла (и в подпапках тоже), но при этом можно было при удачком поиске сразу прервать процедуру и вывести в лейбл путь к файлу или же передать его другой функции.

[Stilet]

Нашел кучу примеров про поиск файлов но ни один из них не подходит

С FindFirst тоже не подходит?

[aank10]

Сообщение от Stilet

С FindFirst тоже не подходит?

С FindFirst тоже находил но они почему то не работали , если не сложно , можешь скинуть примерчик , при условии что он у тебя есть ?

[microbit]

бородатая рекурсивная функция поиска файлов

void FileSearch(CHAR* pszPatch)
{
	WIN32_FIND_DATA File;
	CHAR fPath[MAX_PATH],result[MAX_PATH];

	strcpy(fPath,pszPatch);
	strcat(fPath,"\\*");

	HANDLE hFile = FindFirstFile(fPath,&File);

	if(hFile != INVALID_HANDLE_VALUE)
	{
		do
		{
			if(File.cFileName[0] != '.')
			{
				strcpy(fPath,pszPatch);
				strcat(fPath,"\\");
				strcat(fPath,File.cFileName);
				if(File.dwFileAttributes != FILE_ATTRIBUTE_DIRECTORY)
				{
					if(strcmp(strpbrk(File.cFileName,".txt"),".txt") == 0)
					{
						//fPath имя
					}
					if (File.dwFileAttributes&FILE_ATTRIBUTE_DIRECTORY)
						FileSearch(fPath);
				}
			}
		}while(FindNextFile(hFile,&File));
		FindClose(hFile);
	}
}

[Stilet]

Угу. У меня так же выглядит...

[aank10]

А каким образом можно вызвать эту функцию? я писал

void __fastcall TForm1::Button1Click(TObject *Sender)
{
void FileSearch(CHAR* pszPatch);
ShowMessage(fPath);

}

выбивало ошибку, также пытался выбить в диалоговое окно в самой функции

if(strcmp(strpbrk(File.cFileName,".txt"),".txt") == 0)
					{
						fPath 
                                                ShowMessage(fPath);
}

но опять же её надо вызвать.