find.pas

unit find;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil, SynExportHTML, Forms, Controls, Graphics,
  Dialogs;

type

  { TForm4 }

  TForm4 = class(TForm)
  private
    { private declarations }
  public
    { public declarations }
  end;

var
  Form4: TForm4;

implementation

{$R *.lfm}

end.