amxmodx/editor/studio/UnitfrmAllFilesForm.pas

32 lines
573 B
ObjectPascal
Raw Normal View History

2005-08-26 22:29:39 +04:00
unit UnitfrmAllFilesForm;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
StdCtrls, ExtCtrls, Forms, TBXDkPanels, SpTBXDkPanels, mbTBXListBox,
mbTBXCheckListBox, SpTBXControls;
2005-08-26 22:29:39 +04:00
type
TfrmAllFilesForm = class(TForm)
lblCaption: TLabel;
lstFiles: TmbTBXCheckListBox;
cmdOK: TSpTBXButton;
cmdCancel: TSpTBXButton;
procedure FormShow(Sender: TObject);
end;
var
frmAllFilesForm: TfrmAllFilesForm;
implementation
{$R *.DFM}
procedure TfrmAllFilesForm.FormShow(Sender: TObject);
begin
lstFiles.SetFocus;
end;
end.