谁有现成的jsp代码 实现”个人财产管理系统“ 有数据库 我是学生只有支出就好了 支出 包括吃饭买书购物等

//接收

procedure TForm1.IdUDPServer1UDPRead(Sender: TObjectAData: TStream

ABinding: TIdSocketHandle)

var

tmpstr: string

i, isize: integer

bBuffer: array of Byte

begin

tmpstr := ''

isize := AData.Size

setlength(bBuffer, isize)

AData.ReadBuffer(bBuffer[0], isize)

for i:= 0 to isize - 1 do

begin

tmpstr := tmpstr + chr(bBuffer[i])

end

tmpstr := tmpstr + #13#10 + '------------来自 ' + ABinding.PeerIP + ':' + inttostr(ABinding.PeerPort)

memo1.Lines.Add(tmpstr + #13#10)

edit2.text := ABinding.PeerIP //如果要在对方ip的文本框里面自动记录的话，可以用这句

end

最简单的时钟

控件：Timer 1个

label 1个

CommandButton 1个

代码：

Private Sub Command1_Click()

Timer1.Enabled = True

End Sub

Private Sub Form_Load()

Timer1.Enabled = True

Timer1.Interval = 100

End Sub

Private Sub Timer1_Timer()

Label1.Caption = Time

End Sub

计算器就更简单，除了代码繁复，没有什么难度，我已经做了好多次了。

你要什么样的？带积分和初等函数的要吗？还是只是简单的四则运算？

创建数据库有很多种方法，这里是最简单的创建方法，打开数据库软件以后，在文件菜单里点新建，然后右侧会出现选项卡，我们选择空数据库。打开对话框后，找一个存储数据库文件的位置。然后输入一个新的文件名比如“db2.mdb”

这样就完成了一个新数据库的创建。

我们还可以使用模板来创建数据库，它的好处是，里面有已经设定好的对象、窗体、和表和页。如果你还不会其它的 *** 作，那么可以先用模板来创建一个完整的数据库，可以直接拿来应用。

在这里创建一个“支出管理”数据库，打开文件菜单，新建，点右侧本机上的模板，打开一个对话框，然后点数据库选项卡。

双击“支出”小图标打开对话框，选一个数据库文件保存的位置，再为新建的数据库起个名字，这里是“支出1.mdb”然后点创建按扭。

打开一个数据库向导面板，提示，开支数据库将存储以下所列信息项，在这里只需要点“下一步”按扭,

这一步是很重要的，打开的面板中有数据库表和数据库字段的选项列表，自已可以根据需要来选择，相应的选项，来构成一个符合自己使用的数据库结构。在这里是默认项。然后下一步。

确定样式面板，可以根据自身来选择，选完以后下一步,打印样式，接着下一步,r打开面板输入标题，打上对勾，选一张图片，下一步，打上对勾选项，“是的，启动该数据库”点完成按扭。

开始自动创建生成数据库信息。创建完成以后会自动打开主切换面板，到此我们已经完成了数据库的创建，平时打开数据库我们就可以进入这个面板来进行 *** 作。管理自己的所有数据。

---