请大家帮帮我，我是新手。(50分)

[]我在编写一个桌面数据库的程序，只是想这样学的快。但是有问题了。
第一：我的程序很简单，一共一个主窗口，三个子窗口。三个窗口是通过点击按钮打开的。
请问我的主窗口建完后和那三个窗口都存成什么格式。
第二：这个程序里里还有一个模块，里面一共四个 TTable 和四个 Datasourse .请问这个模
块建完后存成什么格式。我知道这个模块是调用用的。可是为什么调用的时候出错了。
谢谢。。。谢谢。。。[red][/red][black][/black]

默认格式，改文件名就可以
工程文件是DPR，窗体单元是PAS

>>请问我的主窗口建完后和那三个窗口都存成什么格式。
什么意思？是说窗体文件？是*.dfm文件啊。
>>我知道这个模块是调用用的。可是为什么调用的时候出错了。
你引用了吗，如果引用了就把代码贴出来吧，不然没法说

默认就行

我是这样调用的模块：

with updatemodule.studentstable do 这里 updatemodule 是个模块 student是一个表

还用就是 setfocus 这个是干嘛的。它不是函数吧？如果是是干什么用的？？谢谢

filedbyname('name').AsString:='edit1.text' 这句是什么意思？？？

谢谢大家

setfocus是设置焦点，filedbyname('name').AsString:='edit1.text'是指该表当
前记录的'name'字段的值为'edit1'这个编辑框的内容。你最好将完整调用代码贴出来。

setfocus 是获得焦点
filedbyname('name').AsString:='edit1.text'
是将edit1.text的内容付给表里name字段

procedure tdataupdateform.button3click(sender:tobject);
begin
with updatedatamodule.studentstable do
begin
if spinedit1.text='' then
begin
showmessage('请输入学号：')；
spinedit1.setfocus;
exit;
end;
if not locate ('Sno',vararrayof([spinedit1.text]),[lopartialkey]) then
begin
showmessage('无此记录，不能修改！')；
exit;
end;
edit;
filedbyname('name').asstring:=edit1.text;
filedbyname('Sno').asstring:=spinedit1.text;
filedbyname('sex').asstring:=edit3.text;
filedbyname('age').asstring:=edit4.text;
filedbyname('entrance').asstring:=datetimepicker1.date;
post;
showmessage('修改成功！')；
end;
end;
老大们能不能帮我逐杭解释一下。谢谢。。真的谢谢。。心好急呀。谢谢。。谢谢

呵呵，有点过分啊：）刚好加班没啥事：（
procedure tdataupdateform.button3click(sender:tobject);
begin
with updatedatamodule.studentstable do
begin
if spinedit1.text='' then
begin
showmessage('请输入学号：')；
spinedit1.setfocus; //spinedit1.text为空就使它获得焦点，
exit;
end;
if not locate ('Sno',vararrayof([spinedit1.text]),[lopartialkey]) then //不知变量怎么定义的，用locate就是studentstable 定位不到某个记录
begin
showmessage('无此记录，不能修改！')；
exit;
end;
edit;
filedbyname('name').asstring:=edit1.text; //给 name字段付值
filedbyname('Sno').asstring:=spinedit1.text;
filedbyname('sex').asstring:=edit3.text;
filedbyname('age').asstring:=edit4.text;
filedbyname('entrance').asstring:=datetimepicker1.date;
post;
showmessage('修改成功！')；
end;
end;

还真没啥可注释的