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]
