Busquedad en un txt

[eennzzoo]

Hola, tengo un problema. Lo que quiero es buscar un numero de documento dentro de un archivo y me traiga los datos de ese documento.
El archivo .txt seria asi:
33555444
Carlos
Martinez
66777888
Pedro
Rodriguez

void __fastcall TfCliente::btnBuscarClick(TObject *Sender)
{
        FILE *FOpen;
        char Nombre[30], Apellido[30], Dni[30];
	if( OpenDialog2->Execute() )
	{
		FOpen = fopen(OpenDialog2->FileName.c_str(), "r+");

		if( FOpen == NULL )
		{
			ShowMessage("El archivo no se pudo abrir");
			return;
		}
                           fscanf(FOpen, "%s", Dni);
                           fscanf(FOpen, "%s", Nombre);
                           fscanf(FOpen, "%s", Apellido);
                           Form1->editDni->Text = Dni;
                           Form1->editNombre->Text = Nombre;
		           Form1->editApellido->Text = hh;
	}
	fclose(FOpen);
}

Con ese codigo logro traer los primeros 3 datos a sus edits correspondiente.
Lo ideal seria tener un edit al cual yo le ingreso el numero de documento y obtengo los datos que le siguen a ese dni.
Agradezco la ayuda.