From: dwinkjr <dav...@gm...> - 2008-04-16 19:57:03
|
ok I am new to the whole Win32::Gui stuff.. But here is my problem. I am trying to load a combobox with ODBC datasources. The problem I am having is that the combobox is a child. I cant seem to address it correctly. Here is my code. my $GB3 = Win32::GUI::Groupbox->new($Win, -text => "Database Parameters:", -name => "GroupBox_3", -left => 12, -top => 151, -width => 349, -height => 174, ); my $CB= $Win->AddCombobox( -name => "CBox1", -dropdown => 0, -left => 5, -top => 41, -width => 93, -height => 400, -parent => $GB3, ); my %DataSources = Win32::ODBC::DataSources(); foreach $DSNo ( keys( %DataSources ) ) { my %Config = Win32::ODBC::GetDSN( $DSNo ); $Win->CBox1->Add($DSNo); } $Win->CBox1->SetCurSel(0); Can someone help me out here? Thanks in advance. Dave W. -- View this message in context: http://www.nabble.com/Access-control-in-a-child-tp16732261p16732261.html Sent from the perl-win32-gui-users mailing list archive at Nabble.com. |
From: dwinkjr <dav...@gm...> - 2008-04-25 16:20:22
|
Can anyone help me here??? dwinkjr wrote: > > ok I am new to the whole Win32::Gui stuff.. But here is my problem. I am > trying to load a combobox with ODBC datasources. The problem I am having > is that the combobox is a child. I cant seem to address it correctly. > Here is my code. > my $GB3 = Win32::GUI::Groupbox->new($Win, > -text => "Database Parameters:", > -name => "GroupBox_3", > -left => 12, > -top => 151, > -width => 349, > -height => 174, > ); > my $CB= $Win->AddCombobox( > -name => "CBox1", > -dropdown => 0, > -left => 5, > -top => 41, > -width => 93, > -height => 400, > -parent => $GB3, > ); > my %DataSources = Win32::ODBC::DataSources(); > foreach $DSNo ( keys( %DataSources ) ) > { > my %Config = Win32::ODBC::GetDSN( $DSNo ); > $Win->CBox1->Add($DSNo); > } > > $Win->CBox1->SetCurSel(0); > > Can someone help me out here? > Thanks in advance. > Dave W. > -- View this message in context: http://www.nabble.com/Access-control-in-a-child-tp16732261p16897182.html Sent from the perl-win32-gui-users mailing list archive at Nabble.com. |
From: Cloud S. <tha...@ho...> - 2008-04-26 02:09:03
|
dwinkjr wrote: > > ok I am new to the whole Win32::Gui stuff.. But here is my problem. I am > trying to load a combobox with ODBC datasources. The problem I am having > is that the combobox is a child. I cant seem to address it correctly. > Here is my code. > my $GB3 = Win32::GUI::Groupbox->new($Win, > -text => "Database Parameters:", > -name => "GroupBox_3", > -left => 12, > -top => 151, > -width => 349, > -height => 174, > ); > my $CB= $Win->AddCombobox( > -name => "CBox1", > -dropdown => 0, > -left => 5, > -top => 41, > -width => 93, > -height => 400, > -parent => $GB3, > ); > my %DataSources = Win32::ODBC::DataSources(); > foreach $DSNo ( keys( %DataSources ) ) > { > my %Config = Win32::ODBC::GetDSN( $DSNo ); > $Win->CBox1->Add($DSNo); > } > > $Win->CBox1->SetCurSel(0); > > Can someone help me out here? > Thanks in advance. > Dave W. > Try $CB->Add($DSNo) instead $Win->CBox1->Add($DSNo); -- View this message in context: http://www.nabble.com/Access-control-in-a-child-tp16732261p16908542.html Sent from the perl-win32-gui-users mailing list archive at Nabble.com. |
From: Robert H. <Rob...@ca...> - 2008-04-25 18:25:59
|
<br><font size=2 face="sans-serif">Use $CB->InsertItem($DSNo);</font> <br><font size=2 face="sans-serif">instead of </font> <br><tt><font size=2>$Win->CBox1->Add($DSNo);</font></tt><font size=2 face="sans-serif"><br> </font> <br> <br> <br> <table width=100%> <tr valign=top> <td width=40%><font size=1 face="sans-serif"><b>dwinkjr <dav...@gm...></b> </font> <br><font size=1 face="sans-serif">Sent by: per...@li...</font> <p><font size=1 face="sans-serif">16/04/2008 03:57 PM</font> <td width=59%> <table width=100%> <tr valign=top> <td> <div align=right><font size=1 face="sans-serif">To</font></div> <td><font size=1 face="sans-serif">per...@li...</font> <tr valign=top> <td> <div align=right><font size=1 face="sans-serif">cc</font></div> <td> <tr valign=top> <td> <div align=right><font size=1 face="sans-serif">Subject</font></div> <td><font size=1 face="sans-serif">[perl-win32-gui-users] Access control in a child</font></table> <br> <table> <tr valign=top> <td> <td></table> <br></table> <br> <br> <br><tt><font size=2><br> ok I am new to the whole Win32::Gui stuff.. But here is my problem. I am<br> trying to load a combobox with ODBC datasources. The problem I am having is<br> that the combobox is a child. I cant seem to address it correctly. Here is<br> my code.<br> my $GB3 = Win32::GUI::Groupbox->new($Win,<br> -text => "Database Parameters:",<br> -name => "GroupBox_3",<br> -left => 12,<br> -top => 151,<br> -width => 349,<br> -height => 174,<br> );<br> my $CB= $Win->AddCombobox(<br> -name => "CBox1",<br> -dropdown => 0,<br> -left => 5,<br> -top => 41,<br> -width => 93,<br> -height => 400,<br> -parent => $GB3,<br> );<br> my %DataSources = Win32::ODBC::DataSources();<br> foreach $DSNo ( keys( %DataSources ) )<br> {<br> my %Config = Win32::ODBC::GetDSN( $DSNo );<br> $Win->CBox1->Add($DSNo);<br> }<br> <br> $Win->CBox1->SetCurSel(0);<br> <br> Can someone help me out here?<br> Thanks in advance.<br> Dave W.<br> -- <br> View this message in context: http://www.nabble.com/Access-control-in-a-child-tp16732261p16732261.html<br> Sent from the perl-win32-gui-users mailing list archive at Nabble.com.<br> <br> <br> -------------------------------------------------------------------------<br> This SF.net email is sponsored by the 2008 JavaOne(SM) Conference <br> Don't miss this year's exciting event. There's still time to save $100. <br> Use priority code J8TL2D2. <br> http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone<br> _______________________________________________<br> Perl-Win32-GUI-Users mailing list<br> Per...@li...<br> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users<br> http://perl-win32-gui.sourceforge.net/<br> </font></tt> <br> |