StringGrid, tem como só aceitar maiúsculas?
Alguem teria uma :idea: para só aceitar letras maiúsculas :?:
Wgm8
Curtidas 0
Respostas
Okama
06/05/2003
[b:d6dcab7651]procedure [/b:d6dcab7651]TFormPrin.StringGrid1DrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
[b:d6dcab7651]begin[/b:d6dcab7651]
[b:d6dcab7651]with[/b:d6dcab7651] StringGrid1.Canvas [b:d6dcab7651]do begin[/b:d6dcab7651]
FillRect(Rect);
TextOut(Rect.Left+2,Rect.Top+2,UpperCase(StringGrid1.Cells[Acol,ARow]));
[b:d6dcab7651]end;[/b:d6dcab7651]
[b:d6dcab7651]end;[/b:d6dcab7651]
ARow: Integer; Rect: TRect; State: TGridDrawState);
[b:d6dcab7651]begin[/b:d6dcab7651]
[b:d6dcab7651]with[/b:d6dcab7651] StringGrid1.Canvas [b:d6dcab7651]do begin[/b:d6dcab7651]
FillRect(Rect);
TextOut(Rect.Left+2,Rect.Top+2,UpperCase(StringGrid1.Cells[Acol,ARow]));
[b:d6dcab7651]end;[/b:d6dcab7651]
[b:d6dcab7651]end;[/b:d6dcab7651]
GOSTEI 0
Wgm8
06/05/2003
:shock: Poderia me explicar a funcão acima, ela não funcionou...
GOSTEI 0