[delphi-br] Re: focus stringgrid
Bom dia, alguém tem alguma ideia de como implementar a questao abaixo? pesquisei na internet mas nao achei nada, ou talvez alguém possa sugerir algo semelhante. deve haver um jeito de implementar isto pois ja vi em muitos programas. Obrigado, Joanes --- Em seg, 28/9/09, Joanes J. Chiesa inconscient...@yahoo.com.br escreveu: De: Joanes J. Chiesa inconscient...@yahoo.com.br Assunto: focus stringgrid Para: delphi-br yahoogrupos delphi-br@yahoogrupos.com.br Data: Segunda-feira, 28 de Setembro de 2009, 23:56 Boa noite pessoal, Gostaria de implementar a seguinte funcionalidade: ao digitar algum valor na primeira coluna de um stringgrid, gostaria que os valores fossem carregados nas demais células da linha. O que não estou conseguindo é criar um modo de saber quando eu sai da coluna 1. Tentei os eventos (Onsetedittext e OngetEditText) mas estes eventos não são para esta finalidade. Encontrei no google este exemplo porém não consegui implementá-lo e também não tenho certeza se funciona corretamente. Talvez alguém com mais experiência saiba informar se isto realmente funciona. http://forum.devmedia.com.br/viewtopic.php?p=241870sid=f52f0f499a2c0fb202348082291d64df Alguém poderia me ajudar? ou dar alguma dica para criar esta implementação? Obrigado, Joanes Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com
RE: [delphi-br] Re: focus stringgrid
Boa tarde Joanes Acho que nao e possivel saber quando sai da coluna 1, mas pode saber quando voce entra em outra celula usando o evento OnSelectCell Por exemplo: procedure TForm1.SG1SelectCell(Sender: TObject; ACol, ARow: Integer;var CanSelect: Boolean); var i: integer; begin for i:= 2 to 8 do SG1.Cells[i,ARow]:= inttostr(strtoint(SG1.Cells[1, ARow]) * i); end; Nao sei se isso vai ajudar, porque nao estou certo de que voce precisa Att. Steve -Original Message- From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On Behalf Of Joanes J. Chiesa Sent: 06 October 2009 16:29 To: delphi-br yahoogrupos Subject:[delphi-br] Re: focus stringgrid Bom dia, alguém tem alguma ideia de como implementar a questao abaixo? pesquisei na internet mas nao achei nada, ou talvez alguém possa sugerir algo semelhante. deve haver um jeito de implementar isto pois ja vi em muitos programas. Obrigado, Joanes --- Em seg, 28/9/09, Joanes J. Chiesa inconscient...@yahoo.com.br escreveu: De: Joanes J. Chiesa inconscient...@yahoo.com.br Assunto: focus stringgrid Para: delphi-br yahoogrupos delphi-br@yahoogrupos.com.br Data: Segunda-feira, 28 de Setembro de 2009, 23:56 Boa noite pessoal, Gostaria de implementar a seguinte funcionalidade: ao digitar algum valor na primeira coluna de um stringgrid, gostaria que os valores fossem carregados nas demais células da linha. O que não estou conseguindo é criar um modo de saber quando eu sai da coluna 1. Tentei os eventos (Onsetedittext e OngetEditText) mas estes eventos não são para esta finalidade. Encontrei no google este exemplo porém não consegui implementá-lo e também não tenho certeza se funciona corretamente. Talvez alguém com mais experiência saiba informar se isto realmente funciona. http://forum.devmedia.com.br/viewtopic.php?p=241870sid=f52f0f499a2c0fb202348082291d64df Alguém poderia me ajudar? ou dar alguma dica para criar esta implementação? Obrigado, Joanes Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM *** This e-mail and any files transmitted with it are confidential. If you are not the intended recipient, any reading, printing, storage, disclosure, copying or any other action taken in respect of this e-mail is prohibited and may be unlawful. If you are not the intended recipient, please notify the sender immediately by using the reply function and then permanently delete what you have received. Content of emails received by this Trust will be subject to disclosure under the Freedom of Information Act 2000, subject to the specified exemptions, including the Data Protection Act 1998 and Caldicott Guardian principles. This footnote also confirms that, unless otherwise stated, this email message has been swept by Sophos Anti-virus for the presence of computer viruses. ***
Re: [delphi-br] Re: focus stringgrid
Adapte as suas necessidades. Já é um caminho para você pesquisar. procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char); var i : byte; begin if key = #13 then begin i := 0; while i = stringgrid1.ColCount do begin StringGrid1.Cells[i,1] := StringGrid1.Cells[0,1]; inc(i); end; end; end; procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer; var CanSelect: Boolean); begin if ARow = 1 then stringGrid1.Options := stringGrid1.Options + [goEditing] else stringGrid1.Options := stringGrid1.Options - [goEditing]; end; Espero ter ajudado. --- Em ter, 6/10/09, Joanes J. Chiesa inconscient...@yahoo.com.br escreveu: De: Joanes J. Chiesa inconscient...@yahoo.com.br Assunto: [delphi-br] Re: focus stringgrid Para: delphi-br yahoogrupos delphi-br@yahoogrupos.com.br Data: Terça-feira, 6 de Outubro de 2009, 12:28 Bom dia, alguém tem alguma ideia de como implementar a questao abaixo? pesquisei na internet mas nao achei nada, ou talvez alguém possa sugerir algo semelhante. deve haver um jeito de implementar isto pois ja vi em muitos programas. Obrigado, Joanes --- Em seg, 28/9/09, Joanes J. Chiesa inconsciente_ c...@yahoo.com. br escreveu: De: Joanes J. Chiesa inconsciente_ c...@yahoo.com. br Assunto: focus stringgrid Para: delphi-br yahoogrupos delphi...@yahoogrup os.com.br Data: Segunda-feira, 28 de Setembro de 2009, 23:56 Boa noite pessoal, Gostaria de implementar a seguinte funcionalidade: ao digitar algum valor na primeira coluna de um stringgrid, gostaria que os valores fossem carregados nas demais células da linha. O que não estou conseguindo é criar um modo de saber quando eu sai da coluna 1. Tentei os eventos (Onsetedittext e OngetEditText) mas estes eventos não são para esta finalidade. Encontrei no google este exemplo porém não consegui implementá-lo e também não tenho certeza se funciona corretamente. Talvez alguém com mais experiência saiba informar se isto realmente funciona. http://forum. devmedia. com.br/viewtopic .php?p=241870 sid=f52f0f499a2c 0fb202348082291d 64df Alguém poderia me ajudar? ou dar alguma dica para criar esta implementação? Obrigado, Joanes _ _ _ _ _ _ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com _ _ _ _ _ _ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca dos.yahoo. com Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
