<div>
Did you try WinTypes or WinProcs?<br />
<br />
It's been a while since I've used D2.<br />

</div>


Did you try WinTypes or WinProcs?

It's been a while since I've used D2.


<div>
I just did.<br />
WinTypes and WinProcs units gave nothing.
</div>


I just did.
WinTypes and WinProcs units gave nothing.

<div>
TWin32FindData works fine.<br />
Thanks.
</div>


<div>
<div class="content wysiwyg-content">
I'm trying to compile (Delphi 2) following code:<br />
<br />
program Test;<br />
{$APPTYPE CONSOLE}<br />
<br />
uses<br />
&nbsp; SysUtils;<br />
<br />
var FileData: WIN32_FIND_DATA;<br />
&nbsp; &nbsp; hSearch: THandle;<br />
<br />
begin<br />
&nbsp;hSearch:=FindFirstFile(PCh<wbr />ar('D:\1\*<wbr />.*'),FileD<wbr />ata);<br />
&nbsp;repeat Writeln (FileData.cFileName);<br />
&nbsp;until not FindNextFile(hSearch,FileD<wbr />ata);<br />
&nbsp;FindClose(hSearch);<br />
&nbsp;ReadLn;<br />
end.<br />
<br />
Currently I have stuck on: Undeclared identifier 'WIN32_FIND_DATA'.<br />
<br />
I'm a Delphi beginner. Please don't laugh.
</div>
</div>


I'm trying to compile (Delphi 2) following code:

program Test;
{$APPTYPE CONSOLE}

uses
  SysUtils;

var FileData: WIN32_FIND_DATA;
    hSearch: THandle;

begin
 hSearch:=FindFirstFile(PChar('D:\1\*.*'),FileData);
 repeat Writeln (FileData.cFileName);
 until not FindNextFile(hSearch,FileData);
 FindClose(hSearch);
 ReadLn;
end.

Currently I have stuck on: Undeclared identifier 'WIN32_FIND_DATA'.

I'm a Delphi beginner. Please don't laugh.

Which unit to include in ordrer to use WIN32_FIND_DATA statement

Delphi is the most powerful Object Pascal IDE and component library for cross-platform Native App Development with flexible Cloud services and broad IoT connectivity. It provides powerful VCL controls for Windows 10 and enables FMX development for Windows, Mac and Mobile. Delphi is your choice for ultrafast Enterprise Strong Development™. Look for increased memory for large projects, extended multi-monitor support, improved Object Inspector and much more. Delphi is 5x faster for development and deployment across multiple desktop, mobile, cloud and database platforms including 32-bit and 64-bit Windows 10.