Skip to content

Commit 942d2e3

Browse files
bashkirtsevichbashkirtsevich
committed
Initial commit
0 parents  commit 942d2e3

15 files changed

+1116
-0
lines changed

‎3.doc

19.5 KB
Binary file not shown.

‎AtExpl.jpg

17.1 KB
Loading

‎LICENSE

+24
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,24 @@
1+
This is free and unencumbered software released into the public domain.
2+
3+
Anyone is free to copy, modify, publish, use, compile, sell, or
4+
distribute this software, either in source code form or as a compiled
5+
binary, for any purpose, commercial or non-commercial, and by any
6+
means.
7+
8+
In jurisdictions that recognize copyright laws, the author or authors
9+
of this software dedicate any and all copyright interest in the
10+
software to the public domain. We make this dedication for the benefit
11+
of the public at large and to the detriment of our heirs and
12+
successors. We intend this dedication to be an overt act of
13+
relinquishment in perpetuity of all present and future rights to this
14+
software under copyright law.
15+
16+
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
17+
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
18+
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
19+
IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR
20+
OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
21+
ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
22+
OTHER DEALINGS IN THE SOFTWARE.
23+
24+
For more information, please refer to <http://unlicense.org/>

‎Wdof.dcu

29.6 KB
Binary file not shown.

‎Wdof.ddp

51 Bytes
Binary file not shown.

‎Wdof.dfm

+237
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,237 @@
1+
object Form1: TForm1
2+
Left = 252
3+
Top = 126
4+
BorderIcons = [biSystemMenu, biMinimize]
5+
BorderStyle = bsSingle
6+
Caption = 'Work with Microsoft Word and Excel'
7+
ClientHeight = 545
8+
ClientWidth = 414
9+
Color = clBtnFace
10+
Font.Charset = DEFAULT_CHARSET
11+
Font.Color = clWindowText
12+
Font.Height = -13
13+
Font.Name = 'MS Sans Serif'
14+
Font.Style = []
15+
Icon.Data = {
16+
0000010001002020100000000000E80200001600000028000000200000004000
17+
0000010004000000000080020000000000000000000000000000000000000000
18+
0000000080000080000000808000800000008000800080800000C0C0C0008080
19+
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00CCC0
20+
000CCCC0000000000CCCC7777CCCCCCC0000CCCC00000000CCCC7777CCCCCCCC
21+
C0000CCCCCCCCCCCCCC7777CCCCC0CCCCC0000CCCCCCCCCCCC7777CCCCC700CC
22+
C00CCCC0000000000CCCC77CCC77000C0000CCCC00000000CCCC7777C7770000
23+
00000CCCC000000CCCC777777777C000C00000CCCC0000CCCC77777C777CCC00
24+
CC00000CCCCCCCCCC77777CC77CCCCC0CCC000CCCCC00CCCCC777CCC7CCCCCCC
25+
CCCC0CCCCCCCCCCCCCC7CCCCCCCCCCCC0CCCCCCCCCCCCCCCCCCCCCC7CCC70CCC
26+
00CCCCCCCC0CC0CCCCCCCC77CC7700CC000CCCCCC000000CCCCCC777CC7700CC
27+
0000CCCC00000000CCCC7777CC7700CC0000C0CCC000000CCC7C7777CC7700CC
28+
0000C0CCC000000CCC7C7777CC7700CC0000CCCC00000000CCCC7777CC7700CC
29+
000CCCCCC000000CCCCCC777CC7700CC00CCCCCCCC0CC0CCCCCCCC77CC770CCC
30+
0CCCCCCCCCCCCCCCCCCCCCC7CCC7CCCCCCCC0CCCCCCCCCCCCCC7CCCCCCCCCCC0
31+
CCC000CCCCC00CCCCC777CCC7CCCCC00CC00000CCCCCCCCCC77777CC77CCC000
32+
C00000CCCC0000CCCC77777C777C000000000CCCC000000CCCC777777777000C
33+
0000CCCC00000000CCCC7777C77700CCC00CCCC0000000000CCCC77CCC770CCC
34+
CC0000CCCCCCCCCCCC7777CCCCC7CCCCC0000CCCCCCCCCCCCCC7777CCCCCCCCC
35+
0000CCCC00000000CCCC7777CCCCCCC0000CCCC0000000000CCCC7777CCC0000
36+
0000000000000000000000000000000000000000000000000000000000000000
37+
0000000000000000000000000000000000000000000000000000000000000000
38+
0000000000000000000000000000000000000000000000000000000000000000
39+
000000000000000000000000000000000000000000000000000000000000}
40+
OldCreateOrder = False
41+
Position = poScreenCenter
42+
OnClose = FormClose
43+
PixelsPerInch = 120
44+
TextHeight = 16
45+
object Bevel2: TBevel
46+
Left = 32
47+
Top = 184
48+
Width = 353
49+
Height = 9
50+
Shape = bsTopLine
51+
end
52+
object Image1: TImage
53+
Left = 8
54+
Top = 256
55+
Width = 65
56+
Height = 33
57+
Visible = False
58+
end
59+
object Bevel3: TBevel
60+
Left = 8
61+
Top = 352
62+
Width = 401
63+
Height = 9
64+
Shape = bsBottomLine
65+
end
66+
object Bevel4: TBevel
67+
Left = 40
68+
Top = 48
69+
Width = 353
70+
Height = 9
71+
Shape = bsTopLine
72+
end
73+
object Button1: TButton
74+
Left = 16
75+
Top = 56
76+
Width = 385
77+
Height = 25
78+
Caption = 'Open document (Word Application)'
79+
TabOrder = 0
80+
OnClick = Button1Click
81+
end
82+
object Button2: TButton
83+
Left = 16
84+
Top = 88
85+
Width = 385
86+
Height = 25
87+
Caption = 'New doc + table + save doc (OleVariant)'
88+
TabOrder = 1
89+
OnClick = Button2Click
90+
end
91+
object Button4: TButton
92+
Left = 16
93+
Top = 120
94+
Width = 385
95+
Height = 25
96+
Caption = 'Search and Replace (X-Man to M_A_T_R_I_X)'
97+
TabOrder = 2
98+
OnClick = Button4Click
99+
end
100+
object Button5: TButton
101+
Left = 16
102+
Top = 152
103+
Width = 385
104+
Height = 25
105+
Caption = 'Page Setup (PageWidth, PageHeight, Orientation, Margin)'
106+
TabOrder = 3
107+
OnClick = Button5Click
108+
end
109+
object Button6: TButton
110+
Left = 16
111+
Top = 192
112+
Width = 249
113+
Height = 25
114+
Caption = 'Text (Range(a,b), between (a,b))'
115+
TabOrder = 4
116+
OnClick = Button6Click
117+
end
118+
object Button7: TButton
119+
Left = 16
120+
Top = 224
121+
Width = 385
122+
Height = 25
123+
Caption = 'Search and select word "Picture"'
124+
TabOrder = 5
125+
OnClick = Button7Click
126+
end
127+
object Button8: TButton
128+
Left = 16
129+
Top = 256
130+
Width = 185
131+
Height = 25
132+
Caption = 'Pictures 1'
133+
TabOrder = 6
134+
OnClick = Button8Click
135+
end
136+
object Button9: TButton
137+
Left = 16
138+
Top = 288
139+
Width = 385
140+
Height = 25
141+
Caption = 'Statistics of document'
142+
TabOrder = 7
143+
OnClick = Button9Click
144+
end
145+
object Button10: TButton
146+
Left = 16
147+
Top = 320
148+
Width = 385
149+
Height = 25
150+
Caption = 'Table (Rows and Columns)'
151+
TabOrder = 8
152+
OnClick = Button10Click
153+
end
154+
object Edit1: TEdit
155+
Left = 280
156+
Top = 192
157+
Width = 121
158+
Height = 24
159+
TabOrder = 9
160+
Text = 'text between (a,b)'
161+
end
162+
object Button14: TButton
163+
Left = 216
164+
Top = 256
165+
Width = 185
166+
Height = 25
167+
Caption = 'Pictures 2 (Frames)'
168+
TabOrder = 10
169+
OnClick = Button14Click
170+
end
171+
object Button11: TButton
172+
Left = 64
173+
Top = 16
174+
Width = 305
175+
Height = 25
176+
Caption = 'Launch Word'
177+
TabOrder = 11
178+
OnClick = Button11Click
179+
end
180+
object StringGrid1: TStringGrid
181+
Left = 16
182+
Top = 376
183+
Width = 385
184+
Height = 129
185+
RowCount = 3
186+
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
187+
TabOrder = 12
188+
ColWidths = (
189+
64
190+
64
191+
64
192+
64
193+
64)
194+
RowHeights = (
195+
24
196+
24
197+
24)
198+
end
199+
object Button13: TButton
200+
Left = 16
201+
Top = 512
202+
Width = 185
203+
Height = 25
204+
Caption = 'To Excel'
205+
TabOrder = 13
206+
OnClick = Button13Click
207+
end
208+
object Button15: TButton
209+
Left = 216
210+
Top = 512
211+
Width = 185
212+
Height = 25
213+
Caption = 'From Excel'
214+
TabOrder = 14
215+
OnClick = Button15Click
216+
end
217+
object WordApplication1: TWordApplication
218+
AutoConnect = False
219+
ConnectKind = ckRunningOrNew
220+
AutoQuit = False
221+
Left = 32
222+
Top = 64
223+
end
224+
object WordDocument1: TWordDocument
225+
AutoConnect = False
226+
ConnectKind = ckRunningOrNew
227+
Left = 360
228+
Top = 64
229+
end
230+
object XLApp: TExcelApplication
231+
AutoConnect = False
232+
ConnectKind = ckRunningOrNew
233+
AutoQuit = False
234+
Left = 184
235+
Top = 464
236+
end
237+
end

0 commit comments

Comments
 (0)