Viciados BR
Olá bem vindo a o Viciados BR

Se você ainda não e membro Cadastre-se Agora
Ou se você já é membro, Logue-se .
e veja nosso Conteúdo.
Pois conteúdo aqui é o que não falta !
Painel de Usuário

Mensagens: 0


Alterar
Ver
Tópicos e mensagens

Contador de Visitas

Criando Um visualizador de imagem

Ir em baixo

Criando Um visualizador de imagem Empty Criando Um visualizador de imagem

Mensagem por Juuse em Qua Set 21, 2011 6:05 pm

Criando um Visualizador de Imagens[SuperBasico]

Faça seu Visualizado de Imagen em Minutos ^^



Componentes : Button (aba Standard), OpenPictureDialog (aba dialogs), Image (aba Additional).
Declare nas USES ,

Código:
jpeg;


Organize +/- como eu organizei na foto.

De 2 Clicks sobre o Button, apague tudo e coloque:

Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
begin
Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;
end;

end.


Agora clique no Image1, vá no Object Inspetor, | [b]Proportional = True |.

Agora e so salva e Aperta F9 ^^:
Creditos :Juuse
Juuse
Juuse
Membro Avançado
Membro Avançado

Post Post : 170
Reputação Reputação : 0
Data de Inscriçao Data de Inscriçao : 19/04/2011

Ver perfil do usuário

Voltar ao Topo Ir em baixo

Criando Um visualizador de imagem Empty Re: Criando Um visualizador de imagem

Mensagem por BGamer em Qui Set 22, 2011 2:57 pm

Muito Bom Tópico! Gostei! Continue assim!

BGamer
Membro de Bronze
Membro de Bronze

Post Post : 384
Reputação Reputação : 14
Data de Inscriçao Data de Inscriçao : 19/07/2011
Idade : 20
Localização : No Neet Forum

Ver perfil do usuário

Voltar ao Topo Ir em baixo

Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum