Red de conocimiento informático - Consumibles informáticos - (100 puntos de programación Delphi) ¿Cómo darme cuenta de que solo se permiten ingresar números enteros mayores que cero en la edición?

(100 puntos de programación Delphi) ¿Cómo darme cuenta de que solo se permiten ingresar números enteros mayores que cero en la edición?

LeftStr(edit1.text, 1)='0'

Cambiar a LeftStr(edit1.text key, 1)='0'

Porque está vacío al principio y determina el estado de edición antes de presionar la tecla, por lo que ocurre un error, así que simplemente agregue la tecla presionada y ¡todo estará bien!