-
Notifications
You must be signed in to change notification settings - Fork 2
/
Copy pathfrmSaveOrd.pas
45 lines (37 loc) · 1.54 KB
/
frmSaveOrd.pas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
/////////////////////////////////////////////////////////////////////////
// //
// Orion/Z (Orion-128 + Z80-CARD-II) emulator, version 1.9 //
// //
// Author: Sergey A. <[email protected]> //
// //
// Copyright (C) 2006-2016 Sergey A. //
// //
// This program is free software; you can redistribute it and/or //
// modify it in any ways. //
// This program is distributed "AS IS" in the hope that it will be //
// useful, but WITHOUT ANY WARRANTY; without even the implied //
// warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. //
// //
/////////////////////////////////////////////////////////////////////////
unit frmSaveOrd;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;
type
TFrmSave = class(TForm)
Panel1: TPanel;
lbOrdFiles: TListBox;
Panel2: TPanel;
BtnCancel: TButton;
BtnSave: TButton;
private
{ Private declarations }
public
{ Public declarations }
end;
var
FrmSave: TFrmSave;
implementation
{$R *.DFM}
end.