Unit EditExp

Classes

TEditExp - EditExp Ver 1.

Functions

Evaluate - Global FUNCTION !

Fact } { ---------------------------------------------------------------------------- The function Evaluate is passed a mathematical expression in the form of a string (formula) to be evaluated and returns the following: If no errors occur during evaluation then: Result = evaluated expression Status = 0 Location = 0 If an error occurs then: Result = 0.
Register -

Types

Constants

Variables


Functions


function Evaluate(formula: string; var status,location: integer) : double;

Global FUNCTION !

Fact } { ---------------------------------------------------------------------------- The function Evaluate is passed a mathematical expression in the form of a string (formula) to be evaluated and returns the following: If no errors occur during evaluation then: Result = evaluated expression Status = 0 Location = 0 If an error occurs then: Result = 0.0 Status = error type Location = location of error in formula Error types: 0: No error occured 1: Illegal character 2: Incorrect syntax 3: Illegal or missing parenthese 4: Incorrect real format 5: Illegal function 6: Result is undefined 7: Result is too large 8: Result is complex 9: Division by zero ----------------------------------------------------------------------------


procedure Register;


Types


Constants


Variables