Ralp, Você está usando algum componente para scannear a imagem ? Como você está abrindo o aplicativo ? Pelo Delphi, se estiver usando um componente, basta informar o caminho que deseja. Informe mais a sua situação para que possamos ajuda-lo. Abraços.
Em 22 de fevereiro de 2010 13:28, Ralp Alves Bezerra <ral...@gmail.com>escreveu: > > > Está rotina irei utilizar para fazer a carga dos arquivos. > > O que eu queria saber é como configurar a pasta na qual o scanner vai > digitalizar as imagens. > > Ex. Assim que iniciar minha aplicação, automaticamente seria informado ao > scanner a pasta que o mesmo deverá digitalizar as imagens. > > Abraço > > -----Mensagem original----- > De: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> [mailto: > delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>] Em > nome de Jorge Ericsson > Enviada em: segunda-feira, 22 de fevereiro de 2010 13:12 > Para: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > Assunto: Re: [delphi-br] Pasta scanner > > > Ralp, se estiver usando o OpenDialog faça como abaixo: > > var > dlg: TOpenDialog; > ... > dlg := TOpenDialog.Create(Self); > // podia ser dlg := TOpenDialog.Create(nil); > try > dlg.DefaultExt := 'jpeg'; > dlg.Filter := ' Arquivo > < > http://www.forumweb.com.br/foruns/index.php?/topic/31985-criar-opendialog/# > > > > de Imagem (*.jpeg)|*.jpeg|Todos os arquivos (*.*)|*.*'; > dlg.Options := [ofHideReadOnly, ofPathMustExist, ofFileMustExist]; > dlg.Title := 'Diretório das Imagens'; > dlg.InitialDir := ExtractFilePath(Application.ExeName); > > if dlg.Execute then begin > // dlg.FileName tem o nome do arquivo > end; > finally > dlg.Free; > end; > > Espero ter ajudado. > > Em 22 de fevereiro de 2010 07:54, Ralp Alves Bezerra > <ral...@gmail.com <ralprd%40gmail.com>>escreveu: > > > > > > > Bom dia nobre colegas, estou com uma dúvida e mais uma vez recorro a > lista. > > > > Teria uma maneira via Delphi de configurar a pasta em que as imagens > serão > > digitalizadas. > > > > Ex.: Ao abrir meu sistema o mesmo já configurar a pasta que desejo salvar > > as > > imagens. > > > > As imagens serão digitalizadas em um scanner de alta velocidade e após a > > digitalização serão importadas para o meu sistema pegando as imagens na > > pasta que configurei. > > > > Estou utilizando Delphi 7 e Firebird 2.1. > > > > Agradeço desde já e abraço a todos. > > > > Ralp Alves > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > -- > Grato, > > Jorge Ericsson S. Pinheiros > Ericsson Sistemas e Soluções > (61) 3244-4748 / 8592-9960 / 9227-4785 > http://www.jericsson.com.br > jericsson...@gmail.com <jericssonsup%40gmail.com> > jericsson...@jericsson.com.br <jericssonsup%40jericsson.com.br> > skype:jericsson > Brasília - DF > > [As partes desta mensagem que não continham texto foram removidas] > > ------------------------------------ > > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > __________ Information from ESET NOD32 Antivirus, version of virus > signature > database 4887 (20100222) __________ > > The message was checked by ESET NOD32 Antivirus. > > http://www.eset.com > > > > __________ Information from ESET NOD32 Antivirus, version of virus > signature > database 4887 (20100222) __________ > > The message was checked by ESET NOD32 Antivirus. > > http://www.eset.com > > > > -- Grato, Jorge Ericsson S. Pinheiros Ericsson Sistemas e Soluções (61) 3244-4748 / 8592-9960 / 9227-4785 http://www.jericsson.com.br jericsson...@gmail.com jericsson...@jericsson.com.br skype:jericsson Brasília - DF [As partes desta mensagem que não continham texto foram removidas] ------------------------------------ -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html