From Clomosy Docs

No edit summary
No edit summary
 
Line 31: Line 31:
</div>
</div>
<div style="font-size: 14px;font-weight: normal;text-align:justify; max-width: 350px;">
<div style="font-size: 14px;font-weight: normal;text-align:justify; max-width: 350px;">
<li>TextSettings</li>
<li>FontColor</li>
<li>FontColor</li>
<li>FontSize</li>
<li>FontSize</li>
<li>FontVertAlign</li>
<li>FontVertAlign</li>
<li>FontHorzAlign</li>
<li>FontHorzAlign</li>
<li>Font.Style</li>
<li>BackgroundColor</li>
<li>BorderColor</li>
<li>BorderColor</li>
<li>BorderWidth</li>
<li>BackgroundColor</li>
<li>IsTransparent</li>
<li>IsTransparent</li>
<li>IsFill</li>
<li>IsFill</li>
<li>IsRound</li>
<li>RoundHeight</li>
<li>RoundHeight</li>
<li>RoundWidth</li>
<li>RoundWidth</li>
<li>IsRound</li>
<li>BorderWidth</li>
</div>
</div>
</div>
</div>
</div>
<div class="col-lg-6">
<div  class="card d-flex flex-column justify-content-start gap-1 mb-3 h-100" style="padding: 3;">
<div style="font-size: 16px;font-weight: bold;text-align:left;">
SetupComponent Properties
</div>
<div style="font-size: 14px;font-weight: normal;text-align:justify; max-width: 350px;">
<li>Width</li>
<li>Height</li>
<li>PositionX</li>
<li>PositionY</li>
<li>Align</li>
<li>TextColor</li>
<li>BackgroundColor</li>
<li>TextSize</li>
<li>TextBold</li>
<li>MarginTop</li>
<li>MarginBottom</li>
<li>MarginRight</li>
<li>MarginLeft</li>
<li>RoundHeight</li>
<li>RoundWidth</li>
<li>BorderColor</li>
<li>BorderWidth</li>
</div>
</div>
</div>
</div>
</div>
</div>
Line 77: Line 51:


<div class="alert alert-warning" role="alert" data-bs-theme="light">
<div class="alert alert-warning" role="alert" data-bs-theme="light">
To learn the purpose and usage of the <b>SetupComponent</b> and <b>clProSettings</b> properties, please refer to [[Pro Object Properties| the page]].
To learn the purpose and usage of the <b>clProSettings</b> properties, please refer to [[Pro Object Properties| the page]].
</div>
</div>


<b>Example</b><br>
<b>Example</b><br>


For clProSettings:<br>
<pre>
<pre>
  Var   
  Var   
Line 111: Line 84:
   DateEdit1.clProSettings.IsRound = True;
   DateEdit1.clProSettings.IsRound = True;
   DateEdit1.SetclProSettings(DateEdit1.clProSettings);
   DateEdit1.SetclProSettings(DateEdit1.clProSettings);
}
{
  Form1 = TclForm.Create(Self);
  SetTestDate;
  Button1= Form1.AddNewButton(Form1,'Button1','Click');
  Button1.TextSettings.Font.Size=50;
  Button1.Align = alBottom;
  Button1.Margins.Left = 60;
  Button1.Margins.Right = 60;
  Button1.Margins.Bottom = 50;
  Button1.Height = 50;
  Button1.Width = 100;
  Form1.AddNewEvent(Button1,tbeOnClick,'ProDateEditShowStr');
  Form1.Run;
}
</pre>
For SetupComponent:<br>
<pre>
Var 
  Form1:TclForm;
  DateEdit1: TClProDateEdit;
  Button1 : TclButton;
void ProDateEditShowStr;
{
  ShowMessage(DateEdit1.DateStr);
}
void SetTestDate;
{
  DateEdit1 = Form1.AddNewProDateEdit(Form1,'DateEdit1');
  clComponent.SetupComponent(DateEdit1,'{
  "Align" : "Center",
  "Width":150,
  "Height":50,
  "BorderColor":"#323d8c",
  "BackgroundColor":"#a6ade3",
  "RoundHeight":10,
  "RoundWidth":10,
  "BorderWidth":2,
  "TextHorizontalAlign":"center",
  "TextBold":"yes",
  "TextSize":20
}');
 
}
}



Latest revision as of 08:17, 16 April 2025

AComponent : Specifies the parent of the object to be defined.

xName : The name of the defined TClProDateEdit object must be written.

Represents a single-line editable text box containing a date.
When you click or tap the TClProDateEdit control, it displays a date picker that allows you to select a date.

Feature Use of Definition
TClProDateEdit DateEdit1 : TClProDateEdit; A variable belonging to the TClProDateEdit class is created.
AddNewProDateEdit DateEdit1 = Form1.AddNewProDateEdit(Form1,'DateEdit1'); A new TClProDateEdit is added to the form.
DateStr DateEdit1.DateStr Returns the selected date value.

In addition to the features of a standard date edit, TClProDateEdit offers new and advanced features, which we will explain in detail below.

clProSettings Properties

  • TextSettings
  • FontColor
  • FontSize
  • FontVertAlign
  • FontHorzAlign
  • BackgroundColor
  • BorderColor
  • IsTransparent
  • IsFill
  • RoundHeight
  • RoundWidth
  • IsRound
  • BorderWidth

  • Example

     Var   
      Form1:TclForm;
      DateEdit1: TClProDateEdit;
      Button1 : TclButton;
    
    void ProDateEditShowStr;
    {
      ShowMessage(DateEdit1.DateStr);
    }
    
    void SetTestDate;
    {
      DateEdit1 = Form1.AddNewProDateEdit(Form1,'DateEdit1');
      DateEdit1.Align = alCenter;
      DateEdit1.Width = 150;
      DateEdit1.Height = 50;
      DateEdit1.clProSettings.BorderColor = clAlphaColor.clHexToColor('#323d8c');
      DateEdit1.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#a6ade3');
      DateEdit1.clProSettings.RoundHeight = 10;
      DateEdit1.clProSettings.RoundWidth = 10;
      DateEdit1.clProSettings.BorderWidth = 2;
      DateEdit1.clProSettings.FontHorzAlign = palCenter;
      DateEdit1.clProSettings.TextSettings.Font.Style = [fsBold];
      DateEdit1.clProSettings.FontSize = 20;
      DateEdit1.clProSettings.IsFill = True; 
      DateEdit1.clProSettings.IsRound = True;
      DateEdit1.SetclProSettings(DateEdit1.clProSettings);
    }
    
    {
      Form1 = TclForm.Create(Self);
      SetTestDate;
      Button1= Form1.AddNewButton(Form1,'Button1','Click');
      Button1.TextSettings.Font.Size=50;
      Button1.Align = alBottom;
      Button1.Margins.Left = 60;
      Button1.Margins.Right = 60;
      Button1.Margins.Bottom = 50;
      Button1.Height = 50;
      Button1.Width = 100;
      Form1.AddNewEvent(Button1,tbeOnClick,'ProDateEditShowStr');
      Form1.Run;
    }
    

    Output:

    ProDateEdit2.png

    See Also