1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
| Quintiq file version 2.0
| #parent: #root
| Method SetComponentProperty (
| internal[GUIComponent] guicomponent,
| Boolean canedit
| ) id:Method_SWF_DialogEditUser_SetComponentProperty
| {
| #keys: '[113694.2.1203125073]'
| Body:
| [*
| // Set editor property
| readonly := not canedit;
|
| if( readonly
| and guard( not isnull( guicomponent.astype( Editor ) ), false ) )
| {
| guicomponent.SetProperty( "ReadOnly", readonly );
| guicomponent.astype( Editor ).BackgroundColor( Color::Color( 240, 240, 240 ) );
| }
| else
| {
| guicomponent.Enabled( canedit );
| }
| *]
| }
|
|
