[delphi-br] Ajuda com código....
Bom dia a todos... Estou comum problema em um script, não sei se estou fazendo certo, por isso peço a ajuda de vcs. Tenho o seguinte código: function TfrmQILaser.udf_VerificaSentido( tlin : integer ) : integer; var i : integer; kmInicial, kmFinal : double; colI, colF : String; begin Excel.WorkBooks[1].Sheets['5406'].select; kmInicial := Excel.WorkBooks[1].Sheets['5406'].cells[1,2].value; kmFinal := Excel.WorkBooks[1].Sheets['5406'].cells[1,3].value; colI := 'B2'; colF := 'F' + intToStr(tlin - 9); if (kmInicial > kmFinal) then begin Excel.WorkBooks[1].Sheets['5406'].range[ColI +':'+ ColF].select; ///O problema é nesta parte Excel.WorkBooks[1].Sheets['5406'].range[ColI +':'+ ColF].xlDescending; end ; end; Depois de selecionar gostaria de deixar na ordem decrescente, ou crecente, como referencia apenas a coluna "B".
[delphi-br] Ajuda com código
boa noite pessoal, estou fazendo um projeto e esta quase pronto, mas tem uma parte que não sei como fazer, neste site tem umas imagens como exemplo: http://images.google.com.br/imgres?imgurl=http://www.nature.com/jcbfm/journal/v21/n3/thumbs/9591054f2th.jpg&imgrefurl=http://www.nature.com/jcbfm/journal/v21/n3/full/9591054a.html&usg=__muc31XVI6QsIYS_TU_Fn7iOKKT8=&h=150&w=150&sz=34&hl=pt-BR&start=12&sig2=kK3nsX-ewGdd2U1m_FRd3w&um=1&tbnid=ij0qZ7X9Px4ruM:&tbnh=96&tbnw=96&prev=/images%3Fq%3Dcontrast%2Banalysis%2Blasca%26hl%3Dpt-BR%26rlz%3D1B3GGGL_pt-BRBR324BR324%26sa%3DG%26um%3D1&; ei=mPtYSufNC6aCmQfn-ri4AQ lá vai ter uma imagem em preto e branco (A) e uma imagem colorida (B), queria fazer o mesmo é com se fosse umas imagens de camera termográfica, não sei se fui bem claro. Espero que possam me ajudar
Re: [delphi-br] Ajuda com código
Fala Rodrigo, Já te respondi por e-mail, mas só pra deixar registrado pra galera. Apenas atribua nil a propriedade Picture do TImage. Se entendi bem sua dúvida, isso serve, veja: Image1.Picture := nil; Adriano Santos Editor Revista ClubeDelphi 2009/7/5 rodrigoojapa > > > Ola pessoal, > > Estou desenvolvendo um projetinho, mas estou com uma dúvida. > > Tenho uma projetinho que usa o componente TCAMERA,em um botão para capturar > imagens fiz da seguinte forma: > > procedure TfrmCamera.btCapturarClick(Sender: TObject); > begin > camera1.CaptureImageDisque; > imgfoto.Picture.LoadFromFile(camera1.FichierImage); > > end; > > e coloquei um botão para salvar: > > procedure TfrmCamera.btSalvarClick(Sender: TObject); > begin > if SavePictureDialog.Execute then > imgfoto.Picture.SaveToFile(SavePictureDialog.filename); > end; > > O problema é que quando eu vou capturar novamente, ele fica com a > referencia da imagem que eu salvei.. > > como eu posso capturar imagens novamente sem que o a visualização fique com > a referencia da imagem que eu salvei anteriormente. > Não sei se fui bem claro, mas o que eu quero é capturar uma imagem salva-la > e capturar uma outra imagem diferente e salva-la. > > > -- Adriano Santos Director X-35 Consulting and Development IT Manager SoftPark Chief Editor Magazines ClubeDelphi && WebMobile www.delphitodelphi.blogspot.com www.adrianosantos.pro.br www.devmedia.com.br www.dug-sp.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ajuda com código
Ola pessoal, Estou desenvolvendo um projetinho, mas estou com uma dúvida. Tenho uma projetinho que usa o componente TCAMERA,em um botão para capturar imagens fiz da seguinte forma: procedure TfrmCamera.btCapturarClick(Sender: TObject); begin camera1.CaptureImageDisque; imgfoto.Picture.LoadFromFile(camera1.FichierImage); end; e coloquei um botão para salvar: procedure TfrmCamera.btSalvarClick(Sender: TObject); begin if SavePictureDialog.Execute then imgfoto.Picture.SaveToFile(SavePictureDialog.filename); end; O problema é que quando eu vou capturar novamente, ele fica com a referencia da imagem que eu salvei.. como eu posso capturar imagens novamente sem que o a visualização fique com a referencia da imagem que eu salvei anteriormente. Não sei se fui bem claro, mas o que eu quero é capturar uma imagem salva-la e capturar uma outra imagem diferente e salva-la.
[delphi-br] Ajuda com código
Boa noite pessoal, estou com uma duvida, estou fazendo um projeto e eta dando um erro. Funciona da seguinte maneira uso o componente TCamera, quando eu peço para capturar a imagem com o seguinte script: camera1.CaptureImageDisque; imgfoto.Picture.LoadFromFile(camera1.FichierImage); e uso o seguinte script para salvar: if SavePictureDialog.Execute then imgfoto.Picture.SaveToFile(SavePictureDialog.filename); mas quando eu vou capturar a imagem de novo ele da um erro dizendo que não encontra o arquivo especifico. Eu queria que ele capturase uma imagem nova sem se preocupar com a imagem capturada anteriormente.
[delphi-br] Ajuda com Código
Como eu faço para saber se um form está "Nil" ou não. pois tenho o seguinte código: IF not (frmmntalterar=nil) then begin if frmmntalterar.EDITAR=2 then begin dmsistema.mdo_sqlmotorista.Locate('ID_MOTORISTA',frmmntalterar.mdo_sqlauteracoes_motoristaID_MOTORISTA.AsInteger,[]); btnexcluir.Visible:=True; end; end; mas ele não funciona de jeito nenhum. preciso muito de ajuda. Att. Rodrigo Galvan -- < 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: [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE 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:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.