Sistema muito lento na hora de compilar

Delphi

09/09/2005

coloquei o componente image com uma imagem.bmp e as propriedade s

align = alClient e Strech = True

agora meu sistema demora muito pra compilar !

será que estou usando o componente incorretamente ?
dá pra resolver isso eu tenho que tirar esse componente ?

porque se eu tiro ele o sistema volta a compilar normalmente .


Fabiano Góes

Fabiano Góes

Curtidas 0

Respostas

Massuda

Massuda

09/09/2005

Qual o tamanho desse bitmap? Como esse bitmap é parte do arquivoe xecutável do seu programa, talvez o tamanho seja a causa da demora.


GOSTEI 0
Fknyght

Fknyght

09/09/2005

Lembre-se que ao colocar uma imagem dentro da aplicação o delphi tem que compila-la também e se a imagem for muito grande, o tempo de compilação vai aumentar e o tamanho do executável tb.

Uma solução agradavel e vc ler a imagem em tempo de execução. Tipo

procedure TForm1.Create( Self : TObject );
begin
  if fileexists( ExtractFilePath(Application.ExeName) + ´Logotipo.bmp´ ) then
   begin
    image1.picture.loadfromfile(´ExtractFilePath(Application.ExeName)  
    + ´Logotipo.bmp´ );
   Application.ProcessMessage;
end;
end;


A função acima verifica se a image esta no mesmo diretorio do aplicativo, se estiver carregamos a imagem para o componente image1.

Espero ter ajudado


GOSTEI 0
Fknyght

Fknyght

09/09/2005

[b:04146d509f] :lol: Cabei de lembrar[/b:04146d509f]

na clausula [b:04146d509f]uses[/b:04146d509f] adcione a unit [b:04146d509f]jpegs[/b:04146d509f]

Dai vc transforma o se BMP para JPG ( que e menor do que BMP ) e implementa o codigo abaixo

procedure TForm1.Create( Self : TObject );
begin
if fileexists( ExtractFilePath(Application.ExeName) + ´Logotipo.jpg´) then
begin
image1.picture.loadfromfile(´ExtractFilePath(Application.ExeName)
+ ´Logotipo.jpg);
Application.ProcessMessage;
end;
end


GOSTEI 0
POSTAR