converte somente uma coluna do grid para minuscula
08/12/2005
0
caros amigos como faço para converter somente uma coluna do grid para minuscula,
se alguem tiver uma ideia, favor avisar
blz
valeu
se alguem tiver uma ideia, favor avisar
blz
valeu
Fernando
Curtir tópico
+ 0
Responder
Posts
08/12/2005
Edilcimar
a coluna do dbgrid reflete dados em uma tabela, portanto para fazer isto basta colocar a mesma em edit e ir dando um upper em cada um dos registros
Responder
08/12/2005
Adriano Santos
No evento onDrawColumnCell insira:
Observe a linha:
[color=red:5bf141169d][b:5bf141169d]if Column.Field = Table1NAME then[/b:5bf141169d][/color:5bf141169d]
Aqui fiz uma checagem simples para saber qual é a coluna que quero deixar minúscula vinculando ao nome do campo, ou seja, se seu usuário puder, em seu sistema, mover a coluna de lugar o seu código fonte vai converter o texto em qualquer que seja a posição da coluna. Agora se for uma coluna específica que não muda de posição vc pode usar o index da coluna, +/- assim:
[color=red:5bf141169d][b:5bf141169d]if Column.Index = 3 then[/b:5bf141169d][/color:5bf141169d]
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
S: string;
R: TRect;
begin
with DBGrid1.Canvas do
begin
FillRect(Rect);
S := Column.Field.AsString;
R := Rect;
if Column.Field = Table1NAME then
S := LowerCase(S);
DrawText(Handle, PChar(S), Length(S), R, DT_NOCLIP);
end;
end;
Observe a linha:
[color=red:5bf141169d][b:5bf141169d]if Column.Field = Table1NAME then[/b:5bf141169d][/color:5bf141169d]
Aqui fiz uma checagem simples para saber qual é a coluna que quero deixar minúscula vinculando ao nome do campo, ou seja, se seu usuário puder, em seu sistema, mover a coluna de lugar o seu código fonte vai converter o texto em qualquer que seja a posição da coluna. Agora se for uma coluna específica que não muda de posição vc pode usar o index da coluna, +/- assim:
[color=red:5bf141169d][b:5bf141169d]if Column.Index = 3 then[/b:5bf141169d][/color:5bf141169d]
Responder
Clique aqui para fazer login e interagir na Comunidade :)
