Delphi: Open form and wait until it closes

[DarknessOfWhite]

I've put a lot of thought to this, but nothing seems to be working.

Basically what I'm trying to do is this: My program scans a folder for duplicate files, when duplicate files are found, it pops up a form asking what the user would like to do to fix the conflict. Once the user closes this form it carries on searching.

At present it pops up the form, but the procedure carries on, spamming the user with messages, and the "Search Complete" dialog.

I think the easiest way would be to create a variable called something like "duplicateformopen", setting it to yes when opened, and having the duplicate form set it to false when closing, and having a timer detect when the variable has been set to false, then somehow use this to continue the method.

Basically the above solution would be a round-about and ugly way of doing this, I'd appreciate any input.

This is in Borland Delphi 2005.

[_kane81]

use

showmodal

instead of

show

ie.

while....

if (FoundDuplicate) then
begin
  with Application.Create(TForm1) do  
	begin
	  ShowModal;
			Release;
	end;
end;
... continue search