Criar form tempo de execu��o e uma imagem sendo carregada

Question

Estou tentando criar um form em tempo de execu��o e dentro do mesmo ter� uma imagem que ser� carregado um bmp ou jpg.

Eu at� consegui fazer mas nao carrega a imagem.

Teria como voc�s me darem uma forcinha????

Gandalf.nho · Answer

TImage.Picture.LoadFromFile(nome_arquivo)....

Edilcimar · Answer

Image1.Picture.Graphic.LoadFromFile(�minhaimagem.BMP�);...

Levisants · Answer

Eu j� tinha tentando usar assimMas n�o funciona.N�o tem que criar alguma coisa nesse formEstou usando assim o codigoForm := TForm.Create(self)with Form do begin   Imagem := TImage.Create(Form)   Imagem.Picture.LoadFromFile(�caminho da imagem�);end;E mesmo assim n�o vai....

Edilcimar · Answer

eu tenho um timagem e a imagem � bmp, n�o se esque�a do graphic...

Gandalf.nho · Answer

N�o esque�a que se a imagem for JPEG, voc� tem declarar a unit JPEG na cl�usula USES...

Levisants · Answer

O j� fiz tudo isso e nadaO problema � que a imagem n�o carregaEsse � o codigovar  fVisualizaImagem: TForm;  fImagemZoom : TImage;begin    fVisualizaImagem := TForm.Create(Self);    with fVisualizaImagem do begin      Position    := poScreenCenter;      BorderStyle := bsSizeToolWin;      BorderIcons := [biSystemMenu];      Color       := clWhite;      Width       := 300;      Height      := 300;      Caption     := �Imagem: � + lbl_edtNomeProduto.Text;      fImagemZoom := TImage.Create(fVisualizaImagem);      with fImagemZoom do begin        Align     := alClient;        AutoSize  := False;        Center    := True;        Picture.LoadFromFile(�C:Documents and SettingsleandroMeus documentosMinhas imagensimagem1.bmp�);        Stretch   := False;      end;      ShowModal;    end;O form � criado na hora que � clicado  no bot�o...

Levisants · Answer

Galera conseguir fazer faltva somente a propriedade Parent que determina onde ser� criado o objeto

fVisualizaImagem := TForm.Create(Self);
with fVisualizaImagem do begin
Position := poScreenCenter;
BorderStyle := bsSizeToolWin;
BorderIcons := [biSystemMenu];
Color := clWhite;
Width := 300;
Height := 300;
Caption := �Imagem: � + lbl_edtNomeProduto.Text;
fImagemZoom := TImage.Create(fVisualizaImagem);
with fImagemZoom do begin
[b:7263200503]Parent[/b:7263200503] := fVisualizaImagem;
Align := alClient;
AutoSize := False;
Center := True;
Picture.LoadFromFile(�C:\Documents and Settings\leandro\Meus documentos\Minhas imagens\imagem1.bmp�);
Stretch := False;
end;
ShowModal;
end;

F�rum Criar form tempo de execu��o e uma imagem sendo carregada #276217