Como converter p/ maiusculas caracteres digitados no DBGrid?
Amigos do fórum,
Estou tentando sem sucesso a conversão para maiusculas dos caracteres digitados em um DBGrid. Por exemplo, tenho um campo ´Referencia´ que deverá conter caracteres em maiusculas à medida em que eu for digitando os valores.
Agradeço qualquer ajuda ou comentário.
Leo
Estou tentando sem sucesso a conversão para maiusculas dos caracteres digitados em um DBGrid. Por exemplo, tenho um campo ´Referencia´ que deverá conter caracteres em maiusculas à medida em que eu for digitando os valores.
Agradeço qualquer ajuda ou comentário.
Leo
Leoback
Curtidas 0
Respostas
Leanribas
24/01/2004
para que os caracteres digitados no grid fique em maiusculo vc pode fazer assim, no evento OnKeyPress do Grid
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
Key := UpCase(Key);
end;
se vc quer apenas em um deterninado campo vc pode fazer assim,
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if DBGrid1.SelectedField.FieldName = ´REFERENCIA´ then
Key := UpCase(Key);
end;
Falou.
Leandro
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
Key := UpCase(Key);
end;
se vc quer apenas em um deterninado campo vc pode fazer assim,
procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
if DBGrid1.SelectedField.FieldName = ´REFERENCIA´ then
Key := UpCase(Key);
end;
Falou.
Leandro
GOSTEI 0
Leoback
24/01/2004
Muito agradecido Leandro! Funcionou muito bem.
Um abraço.
Leo
Um abraço.
Leo
GOSTEI 0