REVELAR

Fórum Inserindo somente o caminho da imagem... #321621

17/05/2006

0

Boa noite pessoal, procurei e não achei nada específico para o que eu quero fazer....
Quero clicar em um timage ou dbimage e vai abrir aquela caixa pedindo pra localizar a imagem... após eu selecionar, eu gostaria de pegar o nome da foto e sua extensão para inserir no firebird somente o caminho da imagem.

Alguém pode me dar uma luz sobre isso?

Att.


Flaviobrazuca

Flaviobrazuca

Responder

Posts

07/06/2006

Flaviobrazuca

Pessoal, descobri como... fica aí a juda pra que se interessar: é só inserir esse código no ondbclick do timage.

if OpenPictureDialog1.Execute then
begin
if (OpenPictureDialog1.Filename<>´´) then
begin
Image1.Picture.LoadFromFile(OpenPictureDialog1.Filename);
// grava a nova foto para o título
IBQGravaFoto.Active := False;
IBQGravaFoto.SQL.Clear;
IBQGravaFoto.SQL.Add(´update cliente set foto=´+QuotedStr(ExtractFileName(OpenPictureDialog1.Filename))+´ where cod_cliente=´ + QuotedStr(EDCodigo.Text));
IBQGravaFoto.Active:=True;
Image1.Enabled:=False;
DMBanco.IBTrSisloc.CommitRetaining;
end;
end;

Até...


Responder

Gostei + 0

07/06/2006

Flaviobrazuca

Boa noite pessoal, procurei e não achei nada específico para o que eu quero fazer.... Quero clicar em um timage ou dbimage e vai abrir aquela caixa pedindo pra localizar a imagem... após eu selecionar, eu gostaria de pegar o nome da foto e sua extensão para inserir no firebird somente o caminho da imagem. Alguém pode me dar uma luz sobre isso? Att.



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar