急 ！急！急！(100分)

C/S结构的程序（用的SQL server），访问Server版SQL server一切正常，可如果访问98上
装的桌面版，程序运行出错，错误主要在窗体的生成上：（顺序不同，出错窗体还不同），
怎么回事啊？？？

program Project1;
uses
Forms,
Unit50 in 'Unit50.pas' {Form50},
Unit51 in 'Unit51.pas' {Form51},
Unit52 in 'Unit52.pas' {Form52},
Unit53 in 'Unit53.pas' {Form53},
Unit54 in 'Unit54.pas' {Form54},
Unit55 in 'Unit55.pas' {Form55},
Unit56 in 'Unit56.pas' {Form56},
Unit57 in 'Unit57.pas' {Form57},
Unit58 in 'Unit58.pas' {Form58},
Unit59 in 'Unit59.pas' {Form59},
Unit60 in 'Unit60.pas' {Form60},
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2},
Unit3 in 'Unit3.pas' {Form3},
Unit4 in 'Unit4.pas' {Form4},
Unit5 in 'Unit5.pas' {Form5},
Unit6 in 'Unit6.pas' {Form6},
Unit7 in 'Unit7.pas' {Form7},
Unit8 in 'Unit8.pas' {Form8},
Unit9 in 'Unit9.pas' {Form9},
Unit11 in 'Unit11.pas' {Form11},
Unit12 in 'Unit12.pas' {Form12},
Unit13 in 'Unit13.pas' {Form13},
Unit14 in 'Unit14.pas' {Form14},
Unit15 in 'Unit15.pas' {Form15},
Unit16 in 'Unit16.pas' {Form16},
Unit17 in 'Unit17.pas' {Form17},
Unit18 in 'unit18.pas' {Form18},
Unit19 in 'Unit19.pas' {Form19},
Unit20 in 'Unit20.pas' {Form20},
Unit21 in 'Unit21.pas' {Form21},
Unit22 in 'Unit22.pas' {Form22},
Unit23 in 'Unit23.pas' {Form23},
Unit24 in 'Unit24.pas' {Form24},
Unit25 in 'Unit25.pas' {Form25},
Unit26 in 'Unit26.pas' {Form26},
Unit27 in 'Unit27.pas' {Form27},
Unit28 in 'Unit28.pas' {Form28},
Unit29 in 'Unit29.pas' {Form29},
Unit30 in 'Unit30.pas' {Form30},
Unit32 in 'Unit32.pas' {Form32},
Unit33 in 'Unit33.pas' {Form33},
Unit34 in 'Unit34.pas' {Form34},
Unit35 in 'Unit35.pas' {Form35},
Unit36 in 'Unit36.pas' {Form36},
Unit37 in 'Unit37.pas' {Form37},
Unit38 in 'Unit38.pas' {Form38},
Unit39 in 'Unit39.pas' {Form39},
Unit40 in 'Unit40.pas' {Form40},
Unit41 in 'Unit41.pas' {Form41},
Unit42 in 'Unit42.pas' {Form42},
Unit49 in 'Unit49.pas' {beginning},
Unit44 in 'Unit44.pas' {Form44},
Unit45 in 'Unit45.pas' {Form45},
Unit46 in 'Unit46.pas' {Form46},
Unit47 in 'Unit47.pas' {Form47},
Unit48 in 'Unit48.pas' {Form48},
Unit43 in 'Unit43.pas' {Form43},
Unit10 in 'Unit10.pas' {Form10},
Unit61 in 'Unit61.pas' {Form61},
Unit62 in 'Unit62.pas' {Form62},
Unit63 in 'Unit63.pas' {Form63},
Unit64 in 'Unit64.pas' {Form64},
Unit65 in 'Unit65.pas' {Form65},
Unit66 in 'Unit66.pas' {Form66},
Unit67 in 'Unit67.pas' {Form67},
Unit68 in 'Unit68.pas' {Form68},
Unit69 in 'Unit69.pas' {Form69},
Unit70 in 'Unit70.pas' {Form70},
Unit71 in 'Unit71.pas' {Form71},
Unit72 in 'Unit72.pas' {Form72},
Unit73 in 'Unit73.pas' {Form73},
Unit74 in 'Unit74.pas' {Form74},
Unit75 in 'Unit75.pas' {Form75},
Unit76 in 'Unit76.pas' {Form76},
Unit77 in 'Unit77.pas' {Form77},
Unit78 in 'Unit78.pas' {Form78},
Unit31 in 'Unit31.pas' {Form31},
Unit79 in 'Unit79.pas' {Form79};

{$R *.RES}

begin
beginning:=Tbeginning.create(application);
beginning.Height:=225;
beginning.Width:=265;
beginning.show;
beginning.update;
Application.Initialize;
Application.CreateForm(TForm48, Form48);
Application.CreateForm(TForm14, Form14);
Application.CreateForm(TForm16, Form16);
Application.CreateForm(TForm50, Form50);
Application.CreateForm(TForm19, Form19);
Application.CreateForm(TForm70, Form70);
Application.CreateForm(TForm71, Form71);
Application.CreateForm(TForm72, Form72);
Application.CreateForm(TForm73, Form73);
Application.CreateForm(TForm69, Form69);
Application.CreateForm(TForm18, Form18);
Application.CreateForm(TForm15, Form15);
Application.CreateForm(TForm68, Form68);
Application.CreateForm(TForm30, Form30);
Application.CreateForm(TForm22, Form22);
Application.CreateForm(TForm31, Form31);
Application.CreateForm(TForm34, Form34);
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm79, Form79);
Application.CreateForm(TForm76, Form76);
Application.CreateForm(TForm77, Form77);
Application.CreateForm(TForm75, Form75);
Application.CreateForm(TForm58, Form58);
Application.CreateForm(TForm53, Form53);
Application.CreateForm(TForm27, Form27);
Application.CreateForm(TForm52, Form52);
Application.CreateForm(TForm54, Form54);
Application.CreateForm(TForm56, Form56);
Application.CreateForm(TForm57, Form57);
Application.CreateForm(TForm60, Form60);
Application.CreateForm(TForm4, Form4);
Application.CreateForm(TForm5, Form5);
Application.CreateForm(TForm8, Form8);
Application.CreateForm(TForm17, Form17);
Application.CreateForm(TForm23, Form23);
Application.CreateForm(TForm24, Form24);
Application.CreateForm(TForm25, Form25);
Application.CreateForm(TForm26, Form26);
Application.CreateForm(TForm74, Form74);
Application.CreateForm(TForm78, Form78);
beginning.hide;
beginning.free;
Application.Run;
end.

你一次创建的窗体太多了，系统内存都被耗费光了！
需要使用动态创建来完成！

真是恐怖，我如果象你这样创建窗体，顶多20多个就完蛋大吉了！

这与98还是2000有关吗？

danger!

恐怖！恐怖！恐怖！
项目设置一下：
Project--->Options---->Forms：
除了启动窗体及DATAMODULE外，统统放到Available forms 页！！！！

在Project/options中
看看Forms页
左边列表框是自动创建的窗体（默认），右边是可用窗，
从左边移走一些到右边去，右边的窗体需要在程序中动态创建

呵呵,可以理解,以前我刚学DELPHI时也是如此,liamy不必伤怀

多谢各位高人，看来不是这个问题，我试了一下
if not assigned(form1) then
form1:=Tform1.create(self);
执行到create时还是提示产生SQL server错误。
怎么办啊？？

那肯定是你的SQL写法有问题，铁出来看看，大家才能找出问题所在嘛。

你用什么连数据库？BDE？ADO？

BDE

一个性生成这么多窗口?SUPER_MAN!!!!!!
改少一点!

多人接受答案了。