Como usar Splash

Delphi

16/02/2003

Estou tentando usar uma tela de Splash mas está dando eu erro, ´Access Violation´

Alguém sabe como usar isso?

Tks


Henriquebyte

Henriquebyte

Curtidas 0

Respostas

Anonymous

Anonymous

16/02/2003

program Captura_Sprites;

uses
Forms,
Windows,
Uprincipal in ´Uprincipal.pas´ ,
Ucfg in ´Ucfg.pas´ ,
Udir in ´Udir.pas´ ,
Ucontagem in ´Ucontagem.pas´ ,
UjpgCfg in ´UjpgCfg.pas´ ,
Usplash1 in ´Usplash1.pas´ ,
Help01 in ´help\Help01.pas´ ,
Ubout in ´Ubout.pas´ ;

{$R *.res}

begin
Application.Initialize;
FrmSplash:= TFrmSpalsh.create(Application);
FrmSpalsh.Show;
FrmSplash.Update;
Application.Title := ´Captura Spites´;
Application.CreateForm(TFrmPrincipal, FrmPrincipal);
Application.CreateForm(TFrmHelp01, FrmHelp01);
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TFrmCfg, FrmCfg);
Application.CreateForm(TFrmDir, FrmDir);
Application.CreateForm(TFrmCOntagem, FrmCOntagem);
Application.CreateForm(TFrmJpgCfg, FrmJpgCfg);
Application.CreateForm(TFrmCfg, FrmCfg);
Application.CreateForm(TFrmDir, FrmDir);
Application.CreateForm(TFrmCOntagem, FrmCOntagem);
FrmSplash.close;
Application.Run;
end.


O formulario splash não pode ter nada no evento oncreate da erro num sei porq
Newbye@globo.com
Icq: 120695381


GOSTEI 0
POSTAR