9
:
, , implementation. .
Delphi , ( Uses).
, :
1. ( Delphi, , , ).
2. File New Unit Delphi for Win32.
, Delphi .
, , .. .
- unit, ( ).
- interface . , , .
- implementation () , interface.
1. , GetSubstr.
2. Save File My_Unit 9.
Lab9 .
4. 9.
5. , :
- ( Add Lab9.exe)
, , .
- Uses ( Delphi ).
6. .
7. .
- Button1Click FormActivate
- TForm1.Button1Click GetSubstr, my unit.
.