Simples visualizador de imagens em delphi7


-------------------------------------------------------------------------------------
Tutorial escrito:

Vamos utilizar:

1 - MainMenu (Satandard)
1 - Image (Additonal)
1 - Statusbar (Win32)
1 - XPManifest (Win32)
1 - OpenPictureDialog (Dialogs)

--------------------------------------------------------------------------------------
Organização:

A image vai ficar alinhado em alClient...


Depois vamos configurar a statusbar. Para isso dê um duplo clique na "statusbar", irá abrir esse pequeno menu de configuração...
Siga as imagens:



Depois você vai configurar o "Image"... Siga as imagens:







-----------------------------------------------------------------------------------
Selecione também a opção "Picture" e escolha uma imagem em formato "JPEG"...
-----------------------------------------------------------------------------------
Programando...

Código do botão "abrir":  (Entre o begin e o end)

if OpenPictureDialog1.Execute then
begin
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
StatusBar1.Panels[0].Text:= 'Caminho da imagem: '+OpenPictureDialog1.FileName;
end;


Só isso ai...
Agora é só salvar e testar...

Olha como ficou o meu:




  


Simples visualizador de imagens em delphi7 Simples visualizador de imagens em delphi7 Reviewed by Dayvid on 21:05 Rating: 5

Nenhum comentário