Form1
Geometry
Form1+
Label1
$ENTER THE THREE SIDES OS A TRIANGLE:
Label2
Side A:
Label3
Side B:
Label4
Side C:
SideA
SideB
SideC
Label5
Semi Perimiter of Triangle:
Label6
Area of Triangle:
Command1
Command2
Cancel
MenExit
E&xit
Form_Click
MinRoutine
printBuf
Semi_Per
SemiPerv
Sides
Label6_ClickZ
Command1_Click
retcode
SideA
SideB
SideC
retsemiK
retarea
Area_Changed
TrArea
Command2_Click
MenExit_Click
Command1_Click
INVALID TRIANGLE !!"
Triangle
Command2_Click
MenExit_Click