Duvidas StringGrid
Pessoal, estou com duvidas...
Alguém pode me ajudar com isso:
1) Retornar no Edit o valor da célula selecionada;
2) Organizar em ordem crescente o StringGrid;
3) Calcular a moda.
Se alguém puder me ajudar eu aradeço
Alguém pode me ajudar com isso:
1) Retornar no Edit o valor da célula selecionada;
2) Organizar em ordem crescente o StringGrid;
3) Calcular a moda.
Se alguém puder me ajudar eu aradeço
João Natividade
Curtidas 0
Melhor post
Natanael Ferreira
08/07/2016
1) Retornar no Edit o valor da célula selecionada;
No evento OnSelectedCell do Stringgrid:
2) Organizar em ordem crescente o StringGrid;
http://fabiomassalino.blogspot.com.br/2007/12/dica-delphi-ordenando-stringgrid.html
No evento OnSelectedCell do Stringgrid:
Edit1.Text:= StringGrid1.Cells[ACol, ARow];
2) Organizar em ordem crescente o StringGrid;
http://fabiomassalino.blogspot.com.br/2007/12/dica-delphi-ordenando-stringgrid.html
GOSTEI 1
Mais Respostas
Jordan Bernardes
07/07/2016
João, antes de mais nada qual versão do delphi estais utilizando?
É uma aplicação mobile, estas utilizando banco de dados? Se estiver qual?
Se for uma versão XE você pode ligar esses componentes com o LiveBindings Designer.
É uma aplicação mobile, estas utilizando banco de dados? Se estiver qual?
Se for uma versão XE você pode ligar esses componentes com o LiveBindings Designer.
GOSTEI 0
João Natividade
07/07/2016
Usando a versão Seattle, não é uma aplicação mobile, não estou usando banco de dados nenhum, estou adicionando os registros assim:
procedure TfrmMedia.btnEntrarClick(Sender: TObject);
var
num: Real;
Cont_Coluna: Cardinal;
begin
if (btnIncluir.Enabled = False) then
begin
if (edtVlr.Text <> '') then
begin
begin
num := StrToFloat(edtVlr.Text);
with StringGrid1 do
begin
Cont_Coluna := Row;
Cells[0, Cont_Coluna] := IntToStr(Cont_Coluna);
Cells[1, Cont_Coluna] := FloatToStr(num);
RowCount := RowCount+1;
Row := RowCount -1;
end;
edtVlr.SetFocus;
end;
end
else
edtVlr.SetFocus;
end;
end;
GOSTEI 0