aceptar un solo punto en un StringGrid
Hola de nuevo, tengo un nuevo problema:
metí el siguiente codigo en un Tedit para que me aceptara numeros reales y un solo punto, me funciona correctamente pero quisiera saber como se le hace para que eso funcione en las celdas de un StringGrid. Código Delphi [-]procedure TDatosCultivo.Edit2KeyPress(Sender: TObject; var Key: Char); begin If not (Key in ['0'..'9','.',#8]) then Key:=#0; If (Key='.') and (Pos('.',Edit2.Text)>0) Then Key:=#0; end; |
Bueno utilizando el codigo que muestras..yo haria lo siguiente..
espero que te sirva... |
La franja horaria es GMT +2. Ahora son las 01:14:16. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi