Hi,
I have a couple of questions:
1. How do I change or remove the icon of a window?
2. Is it possible to start a Win32::GUI app. in an other programm wich
is running in fullscreen?
3. How do I change the colors of the titlebar, scrollbar(s),
textfields (background), etc.?
4. I want that the second textfield is always at the bottom of the
window, and that only the width is resizeable, not the height!
$W = new Win32::GUI::Window (
-name => "Window",
-title => "W",
-pos => [100, 100],
-size => [400, 400],
-onResize => \&resize,
);
$W->AddTextfield(
-name => "Edit",
-pos => [0, 0],
-size => [100, 100],
-multiline => 1,
-vscroll => 1,
-autovscroll => 1,
-keepselection => 1 ,
-readonly => 1,
);
$W->AddTextfield(
-name => "Edit2",
-pos => [0, 0],
-size => [100, 24],
-autovscroll => 1,
-keepselection => 1,
);
sub resize {
my ($self) = @_;
my ($width, $height) = ($self->GetClientRect())[2..3];
$self->Edit->Resize($width+1, $height+1) if exists $self->{Edit};
# $self->Edit2->Resize(....... ... ... ... .. ) ... ...
}
Example:
________________
| |
| | <------- Textfield 1
| |
|________________|
|________________| <------- Textfield 2 (always at the bottom,
and only the width is resizeable)