500分求平衡二叉树的相关源码.. 谢谢～

TurboPascal 或者 Delphi 的都可以－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－问题描述：利用平衡二叉树实现一个动态查找表。
基本要求：实现动态查找表的三种基本功能：查找、插入和删除。
测试数据：自行设定。
提示：
（1）、初始，平衡二叉树为空树，操作界面给出查找、插入和删除三种操作供选择。每种操作均要提示输入关键字。每次插入或删除一个节点后，应更新平衡二叉树的显示。
（2）、平衡二叉树的显示可采用凹入表形式，也可采用图形界面画出图形。
（3）、假设要删除关键字为x的节点。如果x不在叶子节点上，则用它在左子树中的最大值或右子树中的最小值取代x。如此反复取代，直到删除动作传递倒某个叶子节点。删除叶子节点时，若需要进行平衡变换，可采用插入变换的反变换（如，左子树变矮对应右子树长高）。－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－旁人的作业 可是我实在懒得动手 各位高人谁有现成code请勿吝^^
务必恳请今晚之前
email：[email protected]