-

. .. gor@applmat.msk.su

: Borland C++
#Set-
Delphi



, - - , . , . , . , , .

, " "! , , , - .

, , , . , , , , , , . , ...

, . . , : " ?"

. , . , , , , - . , . , - . , , .

, . , - , .

: Borland C++

. , ++ MS Windows . , - Borland C++ [1]. , , , , , . " ".

? , . (!) . , . , , (.1).

Picture 1

1.
Borland C++.

, - . , , . , , , , , . , , , , , , . , .

, . , , Borland C++.

, - : ; , , ; , ; ; . , , , . , , :

MENUITEM , - , , , . ( MENUITEM , .) " " CM_ABOUT, , , MENUITEM:

MENUITEM " ", CM_ABOUT . , : , . , - : , , , . , , , , .

, : ++, , (# 1) , . - ? , .

, , MENUITEM CM_ABOUT. , Windows :

#define CM_ABOUT 213 

#define , , - , . : ++ - . (# 2).

, Borland C++ , , . CM_ABOUT CmAbout:

EV_COMMAND (CM_ABOUT, CmAbout) 

: , . (# 3), .

. CmAbout ( ) , (# 4). , , CmAbout, (# 5).

, . , , . , , , .

#Set-

. c : Text - , MessageName - , Message Number - , FunctionName - .. , OurMenu - .

, , #Set. , , . , :

EV_COMMAND, , .

#Set . - - (OurMenu), . #Set, , , '#'. #End.

#Set : , , . , , #Set.

#Set? . , , , .

- . : , , , . #Set : , , , #Set, .

, , () (). , - . , , , .

. , ( ) ( ) , . , #Set- , - .

#Set- . , : OurMenu. , . , .

, , . -, - , , , , : , . #Set-, , . , #Set-, .

, #Set- . , , : - , ? , , , ? , , Borland - Delphi [2, 3].

Delphi

Delphi - , . Delphi , MS Windows: , , , .. , , , - . , begin end.

Delphi . (, - Borland C++, Delphi, - .) , , . , , (" ") .. , . , , Delphi , , .

Delphi . , " - ", - " () - ".

, , - , . , . , , .

, , , Delphi " - ". , . , Delphi , - Delphi , , Delphi . .

- , Delphi, , , , [3] Delphi (BEGIN), , (begin). Delphi, , ? , . , - #Set- , , .

, Delphi , . , : , , (, ), . , , #Set-.

Delphi . -, . , Delphi [3].

. , . : ; , ; , ; ; ..

, - - , . . . . , .

, . , (!) , . , , :

TPayment =