窗口提前显示，急！
我在窗口onshow中加入了连接oracle数据库的代码。由于连接较慢。所以窗口一直等到连接完成后才显示，请问高手们，有没有什么方法可以让其先显示出来啊。

[解决办法]
在窗口的OnShow事件中加入Oracle连接试试；

或者在工程文件中*.dpr

Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
Oracle连接Connection := true;
[解决办法]
可以在OnActive事件里写代码，注意要有一个标志记录是否已经调用过。

Application.Run;
Oracle连接Connection := true; // 这里的代码直到程序结束才会执行