remove useless files
This commit is contained in:
parent
8fe453d373
commit
809cf44069
6 changed files with 2 additions and 32 deletions
2
.gitignore
vendored
2
.gitignore
vendored
|
|
@ -1 +1,3 @@
|
|||
*.~*
|
||||
*.dcu
|
||||
|
||||
|
|
|
|||
BIN
MainWindow.dcu
BIN
MainWindow.dcu
Binary file not shown.
BIN
Picogus.dcu
BIN
Picogus.dcu
Binary file not shown.
BIN
WinPicoGUS.dcu
BIN
WinPicoGUS.dcu
Binary file not shown.
BIN
WinPicoGUS.dfm
BIN
WinPicoGUS.dfm
Binary file not shown.
|
|
@ -1,32 +0,0 @@
|
|||
unit WinPicoGUS;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
|
||||
StdCtrls, Picogus;
|
||||
|
||||
type
|
||||
TPicoGusForm = class(TForm)
|
||||
CDImageList: TListBox;
|
||||
Label1: TLabel;
|
||||
LblFirmwareVersion: TLabel;
|
||||
private
|
||||
{ Private declarations }
|
||||
public
|
||||
{ Public declarations }
|
||||
end;
|
||||
|
||||
var
|
||||
PicoGusForm: TPicoGusForm;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.DFM}
|
||||
|
||||
initialization
|
||||
if DetectPicoGUS then
|
||||
PicoGusForm.LblFirmwareVersion.Caption := ReadModeString(MODE_FWSTRING)
|
||||
else
|
||||
PicoGusForm.LblFirmwareVersion.Caption := 'PicoGUS not detected!';
|
||||
end.
|
||||
Loading…
Add table
Add a link
Reference in a new issue