Re: [delphi-br] RadioGroup ajuda basica
Informe RadioGroup1.itemindex := -1; From: alessandra porto Sent: Monday, September 15, 2008 4:32 PM To: [EMAIL PROTECTED] ; delphi-br@yahoogrupos.com.br Subject: [delphi-br] RadioGroup ajuda basica como fazer para que ao precionar um botão deixe desmarcado todos os itens de um RadioGroup desta forma eu marco um procedure TForm1.Button1Click(Sender: TObject); begin RadioGroup1.ItemIndex:=0; end; e para desmarcar todos?? Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas] Luciano Pelissoli Lightship Consultoria em Informática Ltda. (19) 3251-7640 (19) 9771-5511 Skype: lpelissoli MSN: [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [MAF] Verificador de versão
Marcos, Um tempo atrás eu resolvi isto criando um programa que verificava a data de criação do arquivo que estava na máquina com o arquivo que estava em um servidor local, se o arquivo do servidor fosse mais novo, fazia o download do novo programa. De forma independente, este programa sempre executava o programa do sistema que está na máquina local. O que eu fiz foi sempre executar primeiro o programa de verificação de versão e depois automaticamente carregava o programa do sistema e finalizava o verificador de versão. Para o usuário, a operação era transparente, ele apenas recebia mensagem de que uma nova versão estava sendo instalada e depois disso a versão nova era automaticamente executada. Vale ressaltar que nesta caso eu tinha apenas um executavel que abrangia todo o sistema. Att. Luciano Pelissoli From: Marcos Ferreira Sent: Tuesday, September 09, 2008 11:19 PM To: delphi-br@yahoogrupos.com.br ; [EMAIL PROTECTED] Subject: [delphi-br] [MAF] Verificador de versão Pessoal, alguém por acaso já fez algum software que verifica a versão instalada no sistema e verifica se existe alguma mais nova disponível. Se houver, esse programa é fechado, é chamado um outro que faz o download da nova versão e é rodado o instalador dela? ou algo parecido!!! Att, Marcos A. Ferreira Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar, ou divulgar as informações nela contidas ou tomar qualquer ação baseada nestas informações. Se você recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperação. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE. ENVIRONMENT commitment and responsibility, think about Before Printing. [As partes desta mensagem que não continham texto foram removidas] Luciano Pelissoli Lightship Consultoria em Informática Ltda. (19) 3251-7640 (19) 9771-5511 Skype: lpelissoli MSN: [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Blob
Bom dia, Acho que DESC é palavra reservada, vc tentou colocar o nome da tabela antes do campo? Ex. SQL.Add('where tab_pro.DESC = :VARNOM '); SQL.Add('order by tab_pro.Desc'); Att. Luciano Pelissoli From: dhsb Sent: Monday, September 08, 2008 10:25 AM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Blob Pessoal estou com uma du vida. Seguinte, tenho uma tabela com apenas dois campos TAB_PRO ID_PRO Int DESC Blob. (TEXTO) Beleza mas eu preciso carregr este texto para um combobox, mas quando vou fazer select esta dando erro. Vejam como faço: Teste:=Combo.Text; if Active then Close; SQL.Clear; SQL.Add('select ID_PRO'); SQL.Add('from TAB_PRO'); SQL.Add('where DESC = :varnom '); SQL.Add('order by DESC'); Parambyname('varnom').AsBlob := Teste; //Ja tentei declarar ela de varios tipos variant, AsString; AsMemo; As Blob mas nao funcionou Open; No combo eu consigo carregar pois preciso setar o campo ID_PRO em uma outra edit e esta dando erro de sql. Banco de dados Firebird delphi 7, e TQuery COMO POSSO PROCEDER? Valeu Luciano Pelissoli Lightship Consultoria em Informática Ltda. (19) 3251-7640 (19) 9771-5511 Skype: lpelissoli MSN: [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] A procura de software GED
Bom dia Douglas. Dê uma olhada no site http://www.sottelli.com.br/, eles possuem esperiência com armazenagem de documentos e têm um produto que atende parcialmente o que vc deseja, quem sabe vcs não estabelecem um ponto em comum para o desenvolvimento do software. Atenciosamente. Luciano Pelissoli Lightship Consultoria em Informática Ltda. (19) 3251-7640 (19) 9771-5511 Skype: lpelissoli MSN: [EMAIL PROTECTED] From: douglas Sent: Thursday, August 28, 2008 8:01 AM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] A procura de software GED Bom Dia Estou à procura de um desenvolvedor que possua software de gerenciamento de documentos (GED) ou que se interesse em desenvolver. O sistema deverá ter as seguintes características: Controle de Usuário (administrador, Indexador, Consulta, impressão e Visualização) Cadastro de documentos (Todo documento indexado deve ser cadastrado para consulta) Digitalização de Documentos (O software deve digitalizar ou importar arquivos) Deve possuir um modulo de consulta e visualização dos documentos. Seria apropriado que o sistema trabalhasse com arquivos em formato pdf. Douglas Mendonça E-mail: [EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: DBGRID
Usei o exemplo em um aplicativo que acessava tabelas do paradox e do dbase e funcionou, mas quando utiliza-se uma tabela ou consulta que acessa os dados em um servidor SQL,(usei o SQL Server) não funciona. O problemas esta na propriedade RECNo, pois ela não funciona direito com os resultados obtidos de um servidor SQL. Então sugiro a utilização de um flag para poder variar entre uma cor e outra. --- Em delphi-br@yahoogrupos.com.br, [EMAIL PROTECTED] escreveu Pessoal estou tentando deixar o dbgrid zebrado. peguei este exemplo o mais está ficando apenas uma cor. O que está errado? procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin if odd(query1.RecNo) then begin DBGrid1.Canvas.Font.Color:= clWhite; DBGrid1.Canvas.Brush.Color:= clGreen; end else begin DBGrid1.Canvas.Font.Color:= clBlack; DBGrid1.Canvas.Brush.Color:= clWhite; end; DBGrid1.Canvas.FillRect(Rect); DBGrid1.Canvas.TextOut(Rect.Left+2,Rect.Top,Column.Field.AsString); end; [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: [EMAIL PROTECTED] ou [EMAIL PROTECTED] 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: http://br.yahoo.com/info/utos.html