The problem is that style is not a string, it is a number.

$style = "WS_CAPTION | WS_SYSMENU";
is not the same as
$style = WS_CAPTION | WS_SYSMENU;

The first (incorrect) format is a string, the second is a number.

This problem has nothing to do with XML, by throwing it in your question you
are  confusing the issue.


Indy Singh
IndigoSTAR Software -- www.indigostar.com


----- Original Message -----
From: Jeremy Blonde <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Monday, July 10, 2000 11:11 PM
Subject: [perl-win32-gui] Using XML file for window layout


> I'm trying to use an XML file to hold the properties
> of the windows in my Perl script.  (No major reason
> for this, I just throught it would be a cool way to
> learn how to use XML with Perl)
>
> However, it seems that if I store the window style in
> a variable, and try to use the variable to set the
> window style, no style is applied to the window when
> it is created.  If I hard code the window style, then
> it appears correctly.
>
> Here is the basic layout of the XML file:
> <windows>
>   <window type="Window Name">
>     <property type="name"     value="Window Name"/>
>     <property type="icon"     value="Icon"/>
>     <property type="version"  value="Version Number"/>
>     <property type="modified" value="Modified Date"/>
>     <property type="title"    value="Window Title"/>
>     <property type="style"    value="Window Styles"/>
>     <property type="left"     value="300"/>
>     <property type="top"      value="200"/>
>     <property type="width"    value="350"/>
>     <property type="height"   value="250"/>
>   </window>
> </windows>
>
> The value for the Window Styles would be:
> "WS_CAPTION | WS_SYSMENU" (or something similar).
>
> $WindowHandle = new GUI::DialogBox (
>   -name    => $Hash{name},
>   -title   => $Hash{title},
>   -style   => $Hash{style}, # No style is applied
>   -style   => WS_CAPTION | WS_SYSMENU, # Works fine
>   -left    => $Hash{left},
>   -top     => $Hash{top},
>   -width   => $Hash{width},
>   -height  => $Hash{height},
> );
>
> Is this something that just cannot be done?  Or do I
> need to do something differently?  Does anyone have
> any suggestions?
>
> Thanks for your help,
> Jeremy Blonde
> [EMAIL PROTECTED]
>
> __________________________________________________
> Do You Yahoo!?
> Get Yahoo! Mail - Free email you can access from anywhere!
> http://mail.yahoo.com/
>




Reply via email to