uppercase no dbgrid

Delphi

18/07/2005

bom dia, pessoal
como faço pra deixar um campo do DBGRID como UPPERcase?


Rafael Santana

Rafael Santana

Curtidas 0

Respostas

Adriano Santos

Adriano Santos

18/07/2005

procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
   if DBGrid1.SelectedField.FieldName=´NOME´ THEN
      Key := AnsiUpperCase(Key)[Length(Key)];
end;



GOSTEI 0
Rjun

Rjun

18/07/2005

Você mesmo criou um tópico sobre isso e respondeu que havia dado certo.

http://forum.clubedelphi.net/viewtopic.php?p=211905&highlight=#211905


GOSTEI 0
Adriano Santos

Adriano Santos

18/07/2005

Confesso que fico um pouco cansado de vez em quando em ler ou responder os mesmos tópicos toda semana. 8)


GOSTEI 0
POSTAR