ActiveDelphi

[Mark1]

Boa tarde !

Precisava alterar para letras maiúsculas tudo o era digitado no StringGrid, achei na net um grande dica.

procedure TfmCONFIG.gridGetEditMask(Sender: TObject; ACol, ARow: Integer; var Value: string);
begin
CASE ACOL OF
1 : VALUE := '!>aa'; // coloca as letras maiusculas,
2 : VALUE := '!>aaaaaaaaaaaaaaa'; // coloca as letras maiusculas,
//3: Value := '!9999'; // coloca a celula somente como números.
END;
end;

Agora me deparei com o seguinte problema: não está aceitando "espaço". Qual a máscara para que na digitação seja aceito o "espaço" ?

Obrigado,

Marcos