35 lines
416 B
Plaintext
35 lines
416 B
Plaintext
WindowTitle {Run...}
|
|
WindowSize 512 64
|
|
|
|
|
|
Widget 1
|
|
Property
|
|
Title {}
|
|
Size 496 24
|
|
Position 8 4
|
|
Flags NoReliefString
|
|
Type TextField
|
|
Value 1
|
|
Main
|
|
Case message of
|
|
SingleClic :
|
|
Begin
|
|
End
|
|
End
|
|
|
|
Widget 2
|
|
Property
|
|
Size 70 18
|
|
Position 410 35
|
|
Flags NoReliefString
|
|
Type PushButton
|
|
Title {Execute...}
|
|
Main
|
|
Case message of
|
|
SingleClic :
|
|
Begin
|
|
Do {Exec exec sh -c '} (GetTitle 1) {' &}
|
|
Quit
|
|
End
|
|
End
|