reinaldo rojo
não registrado
|
|
Postada em 19/12/2013 20:14 hs
Será possível que em um fórum com tantos conhecedores e programadores não existe pelo menos 1 que pode (ou sabe) ajudar com minha dúvida? Estou refazendo a pergunta postada em 18/12/2013 01:06 hs Uso o VB 2010 Express................................ Preciso abrir imagens de uma pasta do meu cpu clicando na linha do datagridview.Como faço pra clicar e abrir o arquivo encontrado, neste caso uma imagem? Pode abrir no visualizador de imagens do windows, que prefiro pra não complicar minha vida porque sou novato, mas pode ser em outra form num picture box, se achar mais fácil.Procuro há dias, mas não encontro, impressionante. É mais fácil achar um programa pra construir um foguete ou uma bomba do que isso!!Obrigado
|
|
|
|
|
|
Omar
|
MONTES CLAROS
MG - BRASIL
|
|
Postada em 23/12/2013 09:01 hs
Então vamos lá. Basta usar. Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button14.Click Dim nomeArquivo As String = "C:Cruzeiro.gif" ' cria processo Dim p As New Process() ' informações do processo p.StartInfo.FileName = "rundll32.exe" p.StartInfo.Arguments = Path.Combine(Environment.SystemDirectory, "shimgvw.dll") & ",ImageView_Fullscreen " & nomeArquivo ' inicia processo p.Start() End Sub http://www.devmedia.com.br/gravando-o-caminho-das-imagens-no-banco-e-as-exibindo-em-net/25337 Basta adaptar. Valeu. |
|
|
|
Reinaldo
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 23/12/2013 11:36 hs
Prezado Omar.
Obrigado por tentar me ajudar. Vou tentar com suas orientações e depois aviso se consegui, mas independentemente disso, agradeço bastante.
|
|
|
|
|
|
Postada em 23/12/2013 13:13 hs
Prezado Omar, quase deu certo, mas só abre a 1ª imagem da pasta.
Criei um botão e usei seu código mudando só o nome da pasta e o nome do botão.
O código que uso pra exibir os nomes das imagens no datagridview é o seguinte:
Private Sub btnExibirArquivos_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExibirArquivos.Click
Dim dir As DirectoryInfo = New DirectoryInfo(txtDiretorio.Text)
If txtDiretorio.Text = String.Empty Then
Dim resultado = From arquivo In dir.GetFiles()
Order By (arquivo.Extension)
Select New With {arquivo.Name, arquivo.Extension, arquivo.Length}
dgvDetalhes.DataSource = resultado.ToList
Else
Dim resultado = From arquivo In dir.GetFiles()
Where arquivo.Name.ToLower().Contains(txtFiltro.Text.ToLower())
Order By (arquivo.Extension)
Select New With {arquivo.Name, arquivo.Extension, arquivo.Length}
dgvDetalhes.DataSource = resultado.ToList
End If
End Sub
Eu digito o nome da imagem no textbox e lista todas as imagens com esse nome nas linhas do datagridview, mas mesmo que eu selecione uma das linhas, não visualizo no visualizados de imagens, pois aparece sempre a mesma imagem, que é a 1ª da pasta.
Temos como resolver?
|
|
|
|
|
