summaryrefslogtreecommitdiff
path: root/examples/windoze/delphi20/multimo3/searchdlg.pas
diff options
context:
space:
mode:
Diffstat (limited to 'examples/windoze/delphi20/multimo3/searchdlg.pas')
-rw-r--r--examples/windoze/delphi20/multimo3/searchdlg.pas35
1 files changed, 0 insertions, 35 deletions
diff --git a/examples/windoze/delphi20/multimo3/searchdlg.pas b/examples/windoze/delphi20/multimo3/searchdlg.pas
deleted file mode 100644
index 7a8144d..0000000
--- a/examples/windoze/delphi20/multimo3/searchdlg.pas
+++ /dev/null
@@ -1,35 +0,0 @@
-unit searchdlg;
-
-interface
-
-uses
- Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
- StdCtrls;
-
-type
- TSearchForm = class(TForm)
- Edit1: TEdit;
- Button1: TButton;
- Button2: TButton;
- ListBox1: TListBox;
- Label1: TLabel;
- procedure Button2Click(Sender: TObject);
- private
- { Private declarations }
- public
- { Public declarations }
- end;
-
-var
- SearchForm: TSearchForm;
-
-implementation
-
-{$R *.DFM}
-
-procedure TSearchForm.Button2Click(Sender: TObject);
-begin
- Close;
-end;
-
-end.