当表单父级设置为非零值时,TForm透明度

时间:2017-01-29 08:49:03

标签: delphi

如果您动态创建表单并将其父表单设置为父表单,为什么透明度不起作用。如果父母是零,透明度是可以的。我希望使用透明度而不是区域来创建非矩形组件。

我看到如果父表单透明度已打开并且其值设置为与子表面相同的值,那么它的工作类似但您看到的是父表单下的内容而不是父表单上的内容。< / p>

由于

import javax.swing.JOptionPane;

public class InputVerification {

   public static Integer parseInt( String value, int min, int max ) {
      try {
         final int iValue = Integer.parseInt( value );
         if(( min <= iValue ) && ( iValue <= max )) {
            return iValue;
         }
      }
      catch( final Throwable t ) {/**/}
      return null;
   }

   public static int getInteger( String message, int lowRange, int highRange ) {
      Integer intValue = null;
      do {
         final String userInput = JOptionPane.showInputDialog( message );
         intValue = parseInt( userInput, lowRange, highRange );
         if( intValue == null ) {
            JOptionPane.showMessageDialog(null,
               "Error! Please pick a number in [" +
               lowRange + ".." + highRange + "]" );
         }
      } while( intValue == null );
      return intValue.intValue();
   }

   public static void main( String[] args ) {
      getInteger("Hello!", 0, 10 );
   }
}

0 个答案:

没有答案