(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!