Skip to content

Commit b85879e

Browse files
r57zoner57zone
committed
Upload
1 parent 903f6e3 commit b85879e

11 files changed

Lines changed: 458 additions & 2 deletions

File tree

‎Config.ini‎

Lines changed: 11 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,11 @@
1+
[Main]
2+
;C:\Users\Users\Pictures
3+
Path=C:\Program Files
4+
5+
;Ñîõðàíÿòü èñòîðèþ è íå ïîêàçûâàòü ïðîøëûå ñëó÷àéíûå ôàéëû. "1" - âêë, "0" - âûêë.
6+
;Save file history and don't show past random files. "1" - on, "0" - off.
7+
FilesHistory=1
8+
9+
;Èãíîðèðîâàòü ôîðìàòû, íàïðèìåð - ".bat|.exe"
10+
;Ignore extensions, for example - ".bat|.exe"
11+
ExcludeExts=.bat

‎LICENSE‎

Lines changed: 15 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,15 @@
1+
Public-domain software
2+
3+
Public-domain software is software that has been placed in the public
4+
domain: in other words, there is absolutely no ownership such as
5+
copyright, trademark, or patent. Software in the public domain can be
6+
modified, distributed, or sold even without any attribution by anyone;
7+
this is unlike the common case of software under exclusive copyright,
8+
where software licenses grant limited usage rights.
9+
10+
Программное обеспечение в общественном достоянии — программное обеспечение,
11+
которое было передано в общественное достояние, другими словами не защищается
12+
авторским правом, товарным знаком или патентом. В отличие от других классов
13+
лицензий, нет никаких ограничений относительно того, что может быть сделано
14+
с программным обеспечением. Программное обеспечение можно изменять,
15+
распространять или продавать даже без ссылки на источник.

‎Project1.cfg‎

Lines changed: 38 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,38 @@
1+
-$A8
2+
-$B-
3+
-$C+
4+
-$D+
5+
-$E-
6+
-$F-
7+
-$G+
8+
-$H+
9+
-$I+
10+
-$J-
11+
-$K-
12+
-$L+
13+
-$M-
14+
-$N+
15+
-$O+
16+
-$P+
17+
-$Q-
18+
-$R-
19+
-$S-
20+
-$T-
21+
-$U-
22+
-$V+
23+
-$W-
24+
-$X+
25+
-$YD
26+
-$Z1
27+
-cg
28+
-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
29+
-H+
30+
-W+
31+
-M
32+
-$M16384,1048576
33+
-K$00400000
34+
-LE"c:\programs\borland\delphi7\Projects\Bpl"
35+
-LN"c:\programs\borland\delphi7\Projects\Bpl"
36+
-w-UNSAFE_TYPE
37+
-w-UNSAFE_CODE
38+
-w-UNSAFE_CAST

‎Project1.dof‎

Lines changed: 136 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,136 @@
1+
[FileVersion]
2+
Version=7.0
3+
[Compiler]
4+
A=8
5+
B=0
6+
C=1
7+
D=1
8+
E=0
9+
F=0
10+
G=1
11+
H=1
12+
I=1
13+
J=0
14+
K=0
15+
L=1
16+
M=0
17+
N=1
18+
O=1
19+
P=1
20+
Q=0
21+
R=0
22+
S=0
23+
T=0
24+
U=0
25+
V=1
26+
W=0
27+
X=1
28+
Y=1
29+
Z=1
30+
ShowHints=1
31+
ShowWarnings=1
32+
UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
33+
NamespacePrefix=
34+
SymbolDeprecated=1
35+
SymbolLibrary=1
36+
SymbolPlatform=1
37+
UnitLibrary=1
38+
UnitPlatform=1
39+
UnitDeprecated=1
40+
HResultCompat=1
41+
HidingMember=1
42+
HiddenVirtual=1
43+
Garbage=1
44+
BoundsError=1
45+
ZeroNilCompat=1
46+
StringConstTruncated=1
47+
ForLoopVarVarPar=1
48+
TypedConstVarPar=1
49+
AsgToTypedConst=1
50+
CaseLabelRange=1
51+
ForVariable=1
52+
ConstructingAbstract=1
53+
ComparisonFalse=1
54+
ComparisonTrue=1
55+
ComparingSignedUnsigned=1
56+
CombiningSignedUnsigned=1
57+
UnsupportedConstruct=1
58+
FileOpen=1
59+
FileOpenUnitSrc=1
60+
BadGlobalSymbol=1
61+
DuplicateConstructorDestructor=1
62+
InvalidDirective=1
63+
PackageNoLink=1
64+
PackageThreadVar=1
65+
ImplicitImport=1
66+
HPPEMITIgnored=1
67+
NoRetVal=1
68+
UseBeforeDef=1
69+
ForLoopVarUndef=1
70+
UnitNameMismatch=1
71+
NoCFGFileFound=1
72+
MessageDirective=1
73+
ImplicitVariants=1
74+
UnicodeToLocale=1
75+
LocaleToUnicode=1
76+
ImagebaseMultiple=1
77+
SuspiciousTypecast=1
78+
PrivatePropAccessor=1
79+
UnsafeType=0
80+
UnsafeCode=0
81+
UnsafeCast=0
82+
[Linker]
83+
MapFile=0
84+
OutputObjs=0
85+
ConsoleApp=1
86+
DebugInfo=0
87+
RemoteSymbols=0
88+
MinStackSize=16384
89+
MaxStackSize=1048576
90+
ImageBase=4194304
91+
ExeDescription=
92+
[Directories]
93+
OutputDir=
94+
UnitOutputDir=
95+
PackageDLLOutputDir=
96+
PackageDCPOutputDir=
97+
SearchPath=
98+
Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;IntrawebDB_50_70;Intraweb_50_70;Rave50CLX;Rave50VCL;dclOfficeXP;BComPortD7;ComDrv32
99+
Conditionals=
100+
DebugSourceDirs=
101+
UsePackages=0
102+
[Parameters]
103+
RunParams=
104+
HostApplication=
105+
Launcher=
106+
UseLauncher=0
107+
DebugCWD=
108+
[Language]
109+
ActiveLang=
110+
ProjectLang=
111+
RootDir=
112+
[Version Info]
113+
IncludeVerInfo=0
114+
AutoIncBuild=0
115+
MajorVer=1
116+
MinorVer=0
117+
Release=0
118+
Build=0
119+
Debug=0
120+
PreRelease=0
121+
Special=0
122+
Private=0
123+
DLL=0
124+
Locale=1049
125+
CodePage=1251
126+
[Version Info Keys]
127+
CompanyName=
128+
FileDescription=
129+
FileVersion=1.0.0.0
130+
InternalName=
131+
LegalCopyright=
132+
LegalTrademarks=
133+
OriginalFilename=
134+
ProductName=
135+
ProductVersion=1.0.0.0
136+
Comments=

‎Project1.dpr‎

Lines changed: 13 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,13 @@
1+
program Project1;
2+
3+
uses
4+
Forms,
5+
Unit1 in 'Unit1.pas' {Main};
6+
7+
{$R *.res}
8+
9+
begin
10+
Application.Initialize;
11+
Application.CreateForm(TMain, Main);
12+
Application.Run;
13+
end.

‎Project1.res‎

14.9 KB
Binary file not shown.

‎README.EN.md‎

Lines changed: 14 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,14 @@
1+
[![RU](https://user-images.githubusercontent.com/9499881/27683795-5b0fbac6-5cd8-11e7-929c-057833e01fb1.png)](https://github.com/r57zone/RandomFile/blob/master/README.md)
2+
[![EN](https://user-images.githubusercontent.com/9499881/33184537-7be87e86-d096-11e7-89bb-f3286f752bc6.png)](https://github.com/r57zone/RandomFile/blob/master/README.EN.md)
3+
# Random File
4+
Application to show a random file from folder. You can save already displayed files and not show them again. You can change the settings in the configuration file "Config.ini".
5+
6+
## Screenshots
7+
![](https://user-images.githubusercontent.com/9499881/42882317-d6692a90-8aa9-11e8-83f1-e474a3a884dd.png)
8+
9+
## Download
10+
>Version for Windows XP, Windows 7, Windows 8.1, Windows 10.<br>
11+
**[Download](https://github.com/r57zone/RandomFile/releases)**
12+
13+
## Feedback
14+
`r57zone[at]gmail.com`

‎README.md‎

Lines changed: 14 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,2 +1,14 @@
1-
# RandomFile
2-
Случайный файл из папки / Random file from folder
1+
[![RU](https://user-images.githubusercontent.com/9499881/27683795-5b0fbac6-5cd8-11e7-929c-057833e01fb1.png)](https://github.com/r57zone/RandomFile/blob/master/README.md)
2+
[![EN](https://user-images.githubusercontent.com/9499881/33184537-7be87e86-d096-11e7-89bb-f3286f752bc6.png)](https://github.com/r57zone/RandomFile/blob/master/README.EN.md)
3+
# Random File
4+
Приложение для показа случайного файла из папки. Можно сохранять уже показанные файлы и не выводить их снова. Изменить настройки можно в конфигурационном файле "Config.ini".
5+
6+
## Скриншоты
7+
![](https://user-images.githubusercontent.com/9499881/42882291-ce59b7b6-8aa9-11e8-957b-820340efb90a.png)
8+
9+
## Загрузка
10+
>Версия для Windows XP, Windows 7, Windows 8.1, Windows 10.<br>
11+
**[Загрузить](https://github.com/r57zone/RandomFile/releases)**
12+
13+
## Обратная связь
14+
`r57zone[собака]gmail.com`

‎Unit1.ddp‎

51 Bytes
Binary file not shown.

‎Unit1.dfm‎

Lines changed: 60 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,60 @@
1+
object Main: TMain
2+
Left = 192
3+
Top = 122
4+
BorderIcons = [biSystemMenu, biMinimize]
5+
BorderStyle = bsSingle
6+
Caption = #1057#1083#1091#1095#1072#1081#1085#1099#1081' '#1092#1072#1081#1083
7+
ClientHeight = 67
8+
ClientWidth = 249
9+
Color = clBtnFace
10+
Font.Charset = DEFAULT_CHARSET
11+
Font.Color = clWindowText
12+
Font.Height = -11
13+
Font.Name = 'MS Sans Serif'
14+
Font.Style = []
15+
OldCreateOrder = False
16+
Position = poScreenCenter
17+
OnClose = FormClose
18+
OnCreate = FormCreate
19+
PixelsPerInch = 96
20+
TextHeight = 13
21+
object FileNameLbl: TLabel
22+
Left = 8
23+
Top = 48
24+
Width = 3
25+
Height = 13
26+
OnClick = FileNameLblClick
27+
end
28+
object NewBtn: TButton
29+
Left = 8
30+
Top = 8
31+
Width = 75
32+
Height = 25
33+
Caption = #1053#1086#1074#1099#1081
34+
TabOrder = 0
35+
OnClick = NewBtnClick
36+
end
37+
object ShowBtn: TButton
38+
Left = 88
39+
Top = 8
40+
Width = 75
41+
Height = 25
42+
Caption = #1055#1086#1082#1072#1079#1072#1090#1100
43+
TabOrder = 1
44+
OnClick = ShowBtnClick
45+
end
46+
object UndoBtn: TButton
47+
Left = 168
48+
Top = 8
49+
Width = 75
50+
Height = 25
51+
Caption = #1054#1090#1084#1077#1085#1080#1090#1100
52+
Enabled = False
53+
TabOrder = 2
54+
OnClick = UndoBtnClick
55+
end
56+
object XPManifest: TXPManifest
57+
Left = 96
58+
Top = 40
59+
end
60+
end

0 commit comments

Comments
 (0)