View PlGroup GUI, Komponenten allgemein
| ID | 19 |
|---|---|
| Text | GUI, Komponenten allgemein |
| Title | Not set |
PlItems
- jTextfield1.requestFocus();
- import java.awt.Dimension; import javax.swing.JPanel; Dimension dim = new Dimension(); dim.height=300; dim.width=500; JPanel pan = new JPanel(); pan.setPreferredSize(dim);
- import javax.swing.UIManager; // Set the L&F to the standard OS-Theme UIManager.setLookAndFeel(UIManager.getSystemLookAndFeelClassName()); // there are other possibilites and L&F-Sets... Just google ;-) // For example look at L2FProd or Substance...
- procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if Key = #13 then begin Key := #0; ShowMessage('Auswerten ...'); end; end;
- Sub TextBox1KeyUp(sender As Object, e As KeyEventArgs) If ((e.KeyCode = Keys.Oemcomma) OR (e.KeyCode = Keys.Decimal)) Then CType(Sender,TextBox).Text = CType(Sender,TextBox).Text.Trim(",") CType(Sender,TextBox).SelectionStart = CType(Sender,TextBox).Text.Length For i As Integer = 0 To Me.Controls.Count-1 If Me.Controls.Item(i).TabIndex = CType(Sender,TextBox).TabIndex+1 Then CType(Me.Controls.Item(i),TextBox).Focus End If Next End If End Sub