unit Unit12;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, cxGraphics, cxControls, cxLookAndFeels, cxLookAndFeelPainters,
cxContainer, cxEdit, dxSkinsCore, dxSkinMcSkin, dxSkinsDefaultPainters,
cxDropDownEdit, cxTextEdit, cxMaskEdit, cxImageComboBox, StdCtrls, Menus,
cxButtons;
type
TForm12 = class(TForm)
cxImageComboBox1: TcxImageComboBox;
cxComboBox1: TcxComboBox;
cxButton1: TcxButton;
procedure cxButton1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form12: TForm12;
implementation
{$R *.dfm}
procedure TForm12.cxButton1Click(Sender: TObject);
begin
Application.Terminate;
end;
end. |
