wxperl-users — For wxPerl users

Re: [wxperl-users] ScrolledWindow drawing C++ help needed

[Mark D. <mar...@zn...>]

Mark Dootson wrote:
> 
> It introduces strangeness when scrolling.
> 

The attached diff fixes my scrolling problems and all now works happily whether via OnDraw or EVT_PAINT.

No crufty changes to Wx.pm either :-)

Thanks

Regards

Mark

Re: [wxperl-users] ScrolledWindow drawing (was Re: wxPerl Standard Selection Dialogs )

[Mark D. <mar...@zn...>]

Mark Dootson wrote:
> Hi,
> 
> The attached diff solves the problem and the code below now works as expected.

Err .. no it doesn't.

It introduces strangeness when scrolling.

Sigh.

Re: [wxperl-users] ScrolledWindow drawing (was Re: wxPerl Standard Selection Dialogs )

[Mark D. <mar...@zn...>]

Hi,

The attached diff solves the problem and the code below now works as expected. Note, you have to call DoPrepareDC to get the overridden method - just like it says in the docs :-)

Having a method loaded via Wx.pm looks a bit crufty - but it was the best I could manage and does the 'right' thing vs inheritance etc. (I think).

Anyone for further testing ?

Mark

 
sub new {
    .......
    .......
    $self->set_user_scale(0.5,0.5);
    .......
    .......
}
 
sub OnDraw {
    my($self, $dc) = @_;
    ...........
    ...........
}
 
sub DoPrepareDC {
    my ($self, $dc) = @_;
    $self->SUPER::DoPrepareDC( $dc );
    $dc->SetUserScale( $self->get_user_scale() );
}

sub get_user_scale {
    my ($self) = @_;
    return @{ $self->{_user_scale} };
}

sub set_user_scale {
    my ($self, $scalex, $scaley) = @_;
    $self->{_user_scale} = [ $scalex, $scaley ];
}

[wxperl-users] ScrolledWindow drawing (was Re: wxPerl Standard Selection Dialogs )

[Mark D. <mar...@zn...>]

Mark Dootson wrote:

> 
> I shall test wrapping DoPrepareDC and post a diff a little later. If you are on MSWin, I will have incorporated changes in PPMs too.
> 

Or maybe not!

I have wrapped DoPrepareDC and that works fine. It still doesn't really solve the issue though:

Within wxWidgets itself, there is a hack used to make OnDraw work.
The base class for ScrolledWindow checks if any handler of a wxPaintEvent in a derived class actually did anything.

If it didn't, the base class still calls its own handler for the event.
That handler does the following.

wxPaintDC dc(m_win);
DoPrepareDC(dc);
OnDraw(dc);

note: the problem here is that the base class DoPrepareDC is called - NOT any DoPrepareDC in any derived class.

Gnash.

So, for now, to do what I suggested in the earlier post, you would do as follows. 
(You don't actually need a separate OnDraw sub anymore of course)

sub new {
    .......
    .......
    EVT_PAINT( $self, \&OnPaint );
    $self->set_user_scale(0.5,0.5);
    .......
    .......
}

sub OnPaint {
    my ($self, $event) = @_;
    $event->Skip(1);
    my $dc = Wx::PaintDC->new($self);
    $self->PrepareDC( $dc );
    $self->OnDraw($dc);
}

sub OnDraw {
    my($self, $dc) = @_;
    ...........
    ...........
}

sub PrepareDC {
    my ($self, $dc) = @_;
    $self->SUPER::PrepareDC( $dc );
    $dc->SetUserScale( $self->get_user_scale() );
}

sub get_user_scale {
    my ($self) = @_;
    return @{ $self->{_user_scale} };
}

sub set_user_scale {
    my ($self, $scalex, $scaley) = @_;
    $self->{_user_scale} = [ $scalex, $scaley ];
}

---------------------------------------------------

It would be nice to have wxPerl act like the C wxWidgets docs suggest so I'll not post a diff for DoPrepareDC. 
To make that work would mean installing a default wxPaintEvent handler for wxScrolledWindow in wxPerl.

Regards

Mark

Re: [wxperl-users] wxPerl Standard Selection Dialogs

[Mark D. <mar...@zn...>]

Hi,

Having to set the user scale all over the place is poor, so you could do the following in your drawing canvas class.

sub PrepareDC {
    my ($self, $dc) = @_;
    $self->SUPER::PrepareDC( $dc );
    $dc->SetUserScale($self->get_user_scale() );
}

sub get_user_scale {
    my ($self) = @_;
    return @{ $self->{_user_scale} };
}

sub set_user_scale {
    my ($self, $scalex, $scaley) = @_;
    $self->{_user_scale} = [ $scalex, $scaley ];
}


By overriding PrepareDC, you can just put setting the user scale in the one place.

EXCEPT:

You do still have to put it in one extra place - your OnDraw routine.
OnDraw prepares the DC for you - which should still work - but doesn't because
PrepareDC is apparantly just a wrapper for DoPrepareDC. Internally, OnDraw calls DoPrepareDC directly. DoPrepareDC is not wrapped by wxPerl so we can't override that. Gnash.

So for now, you'll need ...

sub OnDraw {
    my ($self, $dc) = @_;
    $dc->SetUserScale($self->get_user_scale() );
    .....
    .....

But at least it is only in one place.

I shall test wrapping DoPrepareDC and post a diff a little later. If you are on MSWin, I will have incorporated changes in PPMs too.

B.T.W.

I do have to create something that uses all these functions myself in the near future so having you 'debug' the process in your work is very useful to me too.

Regards

Mark







Mark Dootson wrote:
> Vaughn Staples wrote:
>> Mark,
>>
>> I've used the standard "ColourDialog" in wxPerl; does there also exist 
>> ones for selecting line styles & fill patterns that are commonly used 
>> when drawing on a canvas?  I'm suspecting that what I'm seeking doesn't 
>> exist ... I just want to rule it out.
>>
> 
> Hi,
> 
> You'll need your own custom dialogs for these things.
> 
> On zooming, use $dc->SetUserScale.
> 
> For example
> 
> $dc->SetUserScale(0.5,0.5)
> 
> zooms to 50%.
> 
> You have to call SetUserScale everytime you use the dc, so in addition to in your drawing routines it also needs to go into your mouse events routines BEFORE you call $event->GetLogicalPosition( $dc );
> 
> Regards
> 
> Mark
> 
> 
> 
> -------------------------------------------------------------------------
> Take Surveys. Earn Cash. Influence the Future of IT
> Join SourceForge.net's Techsay panel and you'll get the chance to share your
> opinions on IT & business topics through brief surveys-and earn cash
> http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
> _______________________________________________
> wxperl-users mailing list
> wxp...@li...
> https://lists.sourceforge.net/lists/listinfo/wxperl-users

Re: [wxperl-users] wxPerl Standard Selection Dialogs

[Mark D. <mar...@zn...>]

Vaughn Staples wrote:
> Mark,
> 
> I've used the standard "ColourDialog" in wxPerl; does there also exist 
> ones for selecting line styles & fill patterns that are commonly used 
> when drawing on a canvas?  I'm suspecting that what I'm seeking doesn't 
> exist ... I just want to rule it out.
> 

Hi,

You'll need your own custom dialogs for these things.

On zooming, use $dc->SetUserScale.

For example

$dc->SetUserScale(0.5,0.5)

zooms to 50%.

You have to call SetUserScale everytime you use the dc, so in addition to in your drawing routines it also needs to go into your mouse events routines BEFORE you call $event->GetLogicalPosition( $dc );

Regards

Mark

[wxperl-users] =?GB2312?B?18rBzw==?=

[<les...@16...>]

1/C+tLXEuPe5q8u+o6izp7zSo6nE+rrDo7oNCiAgICC7qrfhyrXStdPQz965q8u+yse+rbmkycy+
1teisuG1x7zHvK/KtdK10+vDs9LXzqrSu8zltPPQzdfbus/G89K1oaPP1tLyw7/Uwr34z+69z7bg
zeqzybK7wcvP+srbtu62yKGiz9bT0MuwxrHTxbvdttTN4rT6wO2jrMbVzajLsMaxo6jJzMa3z/rK
26GixuTL/Lf+zvEgoaK547jmoaLUy8rkoaK9qNb+uaSzzKGi1+LB3qOp1PbWtcuwtcijrM/qz7jL
sMLKv8m4+b7dvfC27rTz0KHAtMnMzNa148r9oaO5q8u+sb7XxbnLv83WwcnP19rWvKOsv8nPyL+q
vt/LsMaxuPi587mry76jrLT9yc/N+NHp1qS78rW9y7DO8b7W0enWpLrz1Nm4tr/uo6ENCiAgICDI
9LnzuavLvqOos6e80qOp1Nq0y8/u0rXO8cnP09DQ6NKqu/LT0NLJwse1xLu2063AtLXn18nRr6Os
ubLI2bei1bmjobTyyMXWrrSmo6y+tMfrwcK94qOhDQrBqs+1yMs61cXPyMn6DQrBqs+1tee7sDoo
MCkxMzkgMjY1MzMgMTM5ICAgUVE6NjA1NjA2NjE2DQrDs9LXzahJRDpodWFmZW5nMDc1NQ0KTVNO
OnN6X2h1YWZlbmdAaG90bWFpbC5jb20gDQpFLW1haWw6aHVhZmVuZzA3NTVAMTI2LmNvbQ==

[wxperl-users] wxPerl Standard Selection Dialogs

[Vaughn S. <vau...@in...>]

Mark,

I've used the standard "ColourDialog" in wxPerl; does there also exist 
ones for selecting line styles & fill patterns that are commonly used 
when drawing on a canvas?  I'm suspecting that what I'm seeking doesn't 
exist ... I just want to rule it out.

Thanks,

Vaughn 

Re: [wxperl-users] DCPaint Widget Question

[Mark D. <mar...@zn...>]

Hi,

I don't think there are any 'built ins' for drawing arrows. The 'Join' and 'Cap' styles for the Wx::Pen are best understood if you consider very wide lines. Then, join styles of miter, bevel and round make sense.

For an arrow, I think you are going to have to work out the points that you need to pass to $dc->DrawPolygon.
If you want the arrows to look good when your lines are at a variety of angles, it will probably need some experimentation.

Regards

Mark

Vaughn Staples wrote:
> 
> I've been seeking tonight for a method to draw arrows on a canvas.  I 
> recognize through the documentation that "lines" have the ability to set 
> an endpoint type, but the list in the wxWidgets documentation does not 
> provide for an arrow/pointer type.  Do you have a recommendation?
> 

Re: [wxperl-users] DCPaint Widget Question

[Mark D. <mar...@zn...>]

Vaughn Staples wrote:
> Mark,
> 
> Excellent ... found it.
> 
> Next question ... I have found that when setting the cursor style as 
> shown below, the cursor does not change until I click down on the 
> canvas.  Then it works fine.  Is there something that I can invoke to 
> change it immediately without forcing the LMB click?
> 
>       $self->SetCursor( Wx::Cursor->new( wxCURSOR_ARROW ) );
> 

Hi Vaughn.

Example now including cursor code at

http://www.wxperl.co.uk/example4.pl.txt

Cursor is set at lines 64,94 and 109.

It seems to work as expected. Are you,perhaps, not following where exactly you are setting the cursor?
wxCURSOR_ARROW is the default cursor, so it may not be apparant from a visual check that it has been set?

Regards

Mark

Re: [wxperl-users] DCPaint Widget Question

[Vaughn S. <vau...@in...>]

Mark,

Excellent ... found it.

Next question ... I have found that when setting the cursor style as 
shown below, the cursor does not change until I click down on the 
canvas.  Then it works fine.  Is there something that I can invoke to 
change it immediately without forcing the LMB click?

      $self->SetCursor( Wx::Cursor->new( wxCURSOR_ARROW ) );

Thanks,

Vaughn

----- Original Message ----- 
From: "Mark Dootson" <mar...@zn...>
To: "Vaughn Staples" <vau...@in...>
Cc: <wxp...@li...>
Sent: Tuesday, March 27, 2007 5:15 PM
Subject: Re: [wxperl-users] DCPaint Widget Question


Vaughn Staples wrote:
> Mark,
>
> Perl on my end could not locate the method "get_control"; I had to
> modify the lines from:
>

Hi,

Sorry, the code was a paste in for the previous example.
There is no 'get_control' as part of Wx - it is implemented in the
example code.
Glad you were able to implement it anyway.

Thanks

Mark

Re: [wxperl-users] DCPaint Widget Question

[Mark D. <mar...@zn...>]

Vaughn Staples wrote:
> Mark,
> 
> Perl on my end could not locate the method "get_control"; I had to 
> modify the lines from:
> 

Hi,

Sorry, the code was a paste in for the previous example.
There is no 'get_control' as part of Wx - it is implemented in the 
example code.
Glad you were able to implement it anyway.

Thanks

Mark

Re: [wxperl-users] textron lineal

[ESonja B. <ab...@su...>]

We told you yesterday this would make a move

up 10% in 1 Day and its just the 1st day, Imagine

Experience a Charging Bull
Critical C A R E New
SYM-C-C-T-I
Cannot go wrong at 22 cents
This is projected to go to $1

up 10% in 1 Day and its just the 1st day, Imagine
where it will be in 5 days
Get in this gem tomorrow, Catch an easy doubler!!

the Nuggets took a 70-44 lead into the locker room. Iverson's drive to the   coach on March 31, 2011, to earn a deferred-compensation package after the school's you or anything,'' Iverson said. ''It just feels good. It just feels like   every shot in the world,'' Suns coach Mike D'Antoni said. ''They are hard to

----- Original Message ----- 
From: "ESonja BBenton" <ab...@su...>
To: <wxp...@li...>
Sent: Thursday, March 22, 2007 8:27 PM
Subject: textron lineal


> Experience a Charging Bull
> Critical C A R E New
> SYM-C-C-T-I
> Cannot go wrong at 22 cents
> This is projected to go to $1

Re: [wxperl-users] DCPaint Widget Question

[Mark D. <mar...@zn...>]

Vaughn Staples wrote:
> Mark,
> 
> A new question concerning the canvas.
> 
> With the drawing objects now complete, I need to save the canvas data as 
> an image file ... such as a BMP, JPG, or GIF.

Hi Vaughn

Procedure below shows the basics. You just have to look up the Wx::FileDialog in the docs and in Wx::Demo to see about selecting filename / filetype.

Regards

Mark

sub evt_menu_file_save {
    my ($self, $event) = @_;
    $event->Skip(1);    # allow event to be processed by further handlers
    
    # have user select a file name and type
    my $filename = 'c:/testimage.png';
    my $imagetype = wxBITMAP_TYPE_PNG;

    # get the device context we have drawn on
    my $canvas = $self->get_control('Canvas');
    my $dc = Wx::ClientDC->new( $canvas );
    $canvas->PrepareDC( $dc );
    
    #get the dimensions
    my ( $width, $height )  = $dc->GetSizeWH();
    
    # create a bitmap to draw on
    my $bmp = Wx::Bitmap->new($width, $height, -1);

    # select it into a memory dc
    my $mdc = Wx::MemoryDC->new();
    $mdc->SelectObject($bmp);
    
    # copy the source dc to the memory dc
    $mdc->Blit(0,0,$width,$height,$dc,0,0);
    
    # get our bitmap back by selecting a null bitmap into the memory dc
    $mdc->SelectObject(wxNullBitmap);
    
    # create image out of bitmap and save
    my $img = Wx::Image->new($bmp);

    # $img->SaveFile($filename , $imagetype);
    
    # lets scale it just for fun
    my $scaled = $img->Scale(int($width / 2), int($height/2));
    
    $scaled->SaveFile($filename , $imagetype);
}

Re: [wxperl-users] DCPaint Widget Question

[Vaughn S. <vau...@in...>]

Mark,

Perl on my end could not locate the method "get_control"; I had to 
modify the lines from:

    my $canvas = $self->get_control('Canvas');
    my $dc = Wx::ClientDC->new( $canvas );
    $canvas->PrepareDC( $dc );

to:

    my $dc = Wx::ClientDC->new( $self );
     $self->PrepareDC( $dc );

Any thoughts as to what could be the problem?  After making the changes 
it all worked fine (thanks!).

Vaughn

----- Original Message ----- 
From: "Mark Dootson" <mar...@zn...>
To: "Vaughn Staples" <vau...@in...>
Cc: <wxp...@li...>
Sent: Tuesday, March 27, 2007 2:22 PM
Subject: Re: [wxperl-users] DCPaint Widget Question


Vaughn Staples wrote:
> Mark,
>
> A new question concerning the canvas.
>
> With the drawing objects now complete, I need to save the canvas data 
> as
> an image file ... such as a BMP, JPG, or GIF.

Hi Vaughn

Procedure below shows the basics. You just have to look up the 
Wx::FileDialog in the docs and in Wx::Demo to see about selecting 
filename / filetype.

Regards

Mark

sub evt_menu_file_save {
    my ($self, $event) = @_;
    $event->Skip(1);    # allow event to be processed by further 
handlers

    # have user select a file name and type
    my $filename = 'c:/testimage.png';
    my $imagetype = wxBITMAP_TYPE_PNG;

    # get the device context we have drawn on
    my $canvas = $self->get_control('Canvas');
    my $dc = Wx::ClientDC->new( $canvas );
    $canvas->PrepareDC( $dc );

    #get the dimensions
    my ( $width, $height )  = $dc->GetSizeWH();

    # create a bitmap to draw on
    my $bmp = Wx::Bitmap->new($width, $height, -1);

    # select it into a memory dc
    my $mdc = Wx::MemoryDC->new();
    $mdc->SelectObject($bmp);

    # copy the source dc to the memory dc
    $mdc->Blit(0,0,$width,$height,$dc,0,0);

    # get our bitmap back by selecting a null bitmap into the memory dc
    $mdc->SelectObject(wxNullBitmap);

    # create image out of bitmap and save
    my $img = Wx::Image->new($bmp);

    # $img->SaveFile($filename , $imagetype);

    # lets scale it just for fun
    my $scaled = $img->Scale(int($width / 2), int($height/2));

    $scaled->SaveFile($filename , $imagetype);
}

Re: [wxperl-users] DCPaint Widget Question

[Vaughn S. <vau...@in...>]

Mark,

A new question concerning the canvas.

With the drawing objects now complete, I need to save the canvas data as 
an image file ... such as a BMP, JPG, or GIF.

Thoughts?

Vaughn

----- Original Message ----- 
From: "Mark Dootson" <mar...@zn...>
To: "Vaughn Staples" <vau...@in...>
Cc: <wxp...@li...>
Sent: Thursday, March 22, 2007 7:58 PM
Subject: Re: [wxperl-users] DCPaint Widget Question


Hi,

I was trying to explain a lot of steps and concepts when really some
example code would have been better.

As I want to complete something myself where I have to move drawn
objects about a canvas, I made sure what I was proposing actually works
with an example which I've posted at:

http://www.wxperl.co.uk/example3.pl.txt

I'm not sure if it would work with the wxGDI interface, but if I had a
lot of objects to draw I could speed up the user experience by doing the
actual drawing to a separate memoryDC only when the drawing objects
actually changed. Then for screen updates, I'd use the built-in fast
bitmap BitBit function ($dc->Blit() ) to just copy the region of the
bitmap I needed to update to the screen.

But with fewer objects to draw, the approach in the example should work
just fine.

Regards

Mark

Re: [wxperl-users] Wx::Perl::ProcessStream

[Mark D. <mar...@zn...>]

Hi Eric,

Thanks for the pointer to ExecuteArgs;

Wx::Perl::ProcessStream->OpenProcess() now accepts an array ref or a command string as the first argument.

The array form is implemented simply as a call to Wx::ExecuteArgs;

Added a test and uploaded a new version.

Regards

Mark

Eric Wilhelm wrote:
> # from Mark Dootson
> # on Monday 26 March 2007 09:03 pm:
> 
>> I'd appreciate any comments and views on code, process and namespace.
> 
> I would really like to see some sort of list-context (\@command or 
> otherwise) functionality.  I've only briefly looked at the source, so 
> there might be some underlying implementation nit forcing your hand 
> here.
> 
>   my $process = Wx::Perl::ProcessStream->OpenProcess(
>     $command, $name, $eventhandler);
> 
> With a quick glance around, it seems that Wx.pm supports the 
> "wxExecute(char **argv,..." form via ExecuteArgs().  It also looks like 
> this would be no different than using ExecuteCommand() in terms of 
> firing the callback.  Perhaps detecting whether $command is an array 
> ref would do it?
> 
> Of course, I'm assuming here that the list form in ExecuteArgs() carries 
> all of the not-running-a-shell benefits of `exec(@list)` (such as "no 
> need to escape spaces in filenames" to name one very common example.)  
> If I'm wrong, ugh.  See also:  execvp(3).  The wx docs aren't exactly 
> clear on what happens so ... at least the unix implementation 
> ("src/unix/utilsunx.cpp") reads as if they've reinvented shell 
> escaping.  Neat.  So, maybe the semicolon ends up as an argument (I 
> think perl goes out of its way to fire-up a shell.)  Ooh.  The windows 
> implementation puts everything together and calls the string form due 
> to the nature of CreateProcess.  Yay.  Well, I see from win32/win32.c 
> create_command_line() that perl works a little harder.
> 
> In any case, I typically build command and arguments as lists.  Would 
> rather not have to do join(" ", map({escape($_)} @list)) and then have 
> wx go through that and split on spaces when the operating system is 
> otherwise quite capable of executing a list of "command and arguments".  
> I guess just leave "what should we do when the operating system is not 
> so capable?" as an exercise for the reader.
> 
> --Eric

Re: [wxperl-users] Wx::Perl::ProcessStream

[Eric W. <scr...@gm...>]

# from Mark Dootson
# on Monday 26 March 2007 09:03 pm:

>I'd appreciate any comments and views on code, process and namespace.

I would really like to see some sort of list-context (\@command or 
otherwise) functionality.  I've only briefly looked at the source, so 
there might be some underlying implementation nit forcing your hand 
here.

  my $process = Wx::Perl::ProcessStream->OpenProcess(
    $command, $name, $eventhandler);

With a quick glance around, it seems that Wx.pm supports the 
"wxExecute(char **argv,..." form via ExecuteArgs().  It also looks like 
this would be no different than using ExecuteCommand() in terms of 
firing the callback.  Perhaps detecting whether $command is an array 
ref would do it?

Of course, I'm assuming here that the list form in ExecuteArgs() carries 
all of the not-running-a-shell benefits of `exec(@list)` (such as "no 
need to escape spaces in filenames" to name one very common example.)  
If I'm wrong, ugh.  See also:  execvp(3).  The wx docs aren't exactly 
clear on what happens so ... at least the unix implementation 
("src/unix/utilsunx.cpp") reads as if they've reinvented shell 
escaping.  Neat.  So, maybe the semicolon ends up as an argument (I 
think perl goes out of its way to fire-up a shell.)  Ooh.  The windows 
implementation puts everything together and calls the string form due 
to the nature of CreateProcess.  Yay.  Well, I see from win32/win32.c 
create_command_line() that perl works a little harder.

In any case, I typically build command and arguments as lists.  Would 
rather not have to do join(" ", map({escape($_)} @list)) and then have 
wx go through that and split on spaces when the operating system is 
otherwise quite capable of executing a list of "command and arguments".  
I guess just leave "what should we do when the operating system is not 
so capable?" as an exercise for the reader.

--Eric
-- 
"Everything should be made as simple as possible, but no simpler."
--Albert Einstein
---------------------------------------------------
    http://scratchcomputing.com
---------------------------------------------------

Re: [wxperl-users] Wx::Perl::ProcessStream

[Mark D. <mar...@zn...>]

Hi,

Following some feedback I have re-implemented the interface and added a number of make tests.
Tests complete OK on MSWin32 / Linux, both with Wx-0.70 + wxWidgets 2.8.3

available at http://www.wxperl.co.uk/processstream.html

I'd appreciate any comments and views on code, process and namespace.

Regards

Mark


> Hi,
> 
> I wanted to execute an external command and have the output returned to me line by line as events. This would mean I could have long running external process running in the background that periodically reports status to the GUI. It also gives me a simple alternative to threads / POE etc. for certain cases.
> 
> I've put it together at http://www.wxperl.co.uk/processstream.html
> 
> A source tar.gz and MSWin32 PPM are downloadable. Both contain an example prog - example/psexample.pl. Just enter a command in the TextCtrl and execute it. It seems to handle multiple concurrent running procs fine.
> 
> I'd appreciate any comments and views on code, process and namespace. (and if I have wasted my time - has this been done elsewhere?)
> 
> Regards
> 
> Mark
> 
> 
> -------------------------------------------------------------------------
> Take Surveys. Earn Cash. Influence the Future of IT
> Join SourceForge.net's Techsay panel and you'll get the chance to share your
> opinions on IT & business topics through brief surveys-and earn cash
> http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
> _______________________________________________
> wxperl-users mailing list
> wxp...@li...
> https://lists.sourceforge.net/lists/listinfo/wxperl-users

Re: [wxperl-users] Panel Scrollbar Usage

[Mark D. <mar...@zn...>]

Use a Wx::ScrolledWindow

add the panel to the ScrolledWindow

resize the panel to accommodate the full extent of your drawing.

Or - maybe just draw on the scrolled window and forget the panel altogether.

Regards

Mark



Gene Beaumont wrote:
> I would like to draw on a panel which is part of a more complex frame. The
> problem I'm having is when the drawn image extends beyond the panel extents.
> It allows me to add scrollbars but they will not scroll the panel
> (right/left or up/down). I have done this with a frame but not having any
> luck with the panel. Would appreciate any feedback on the subject. Gene
> 
> Eugene S. Beaumont Jr.
> Senior Consultant
> Intercept Technology Inc.
> *** Essayons ***
> Office: 1-404-352-0111 x924
>    Fax: 585.768.9372
> http://www.intercept.com
> 
> 
> -------------------------------------------------------------------------
> Take Surveys. Earn Cash. Influence the Future of IT
> Join SourceForge.net's Techsay panel and you'll get the chance to share your
> opinions on IT & business topics through brief surveys-and earn cash
> http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
> _______________________________________________
> wxperl-users mailing list
> wxp...@li...
> https://lists.sourceforge.net/lists/listinfo/wxperl-users

[wxperl-users] Panel Scrollbar Usage

[Gene B. <gen...@in...>]

I would like to draw on a panel which is part of a more complex frame. The
problem I'm having is when the drawn image extends beyond the panel extents.
It allows me to add scrollbars but they will not scroll the panel
(right/left or up/down). I have done this with a frame but not having any
luck with the panel. Would appreciate any feedback on the subject. Gene

Eugene S. Beaumont Jr.
Senior Consultant
Intercept Technology Inc.
*** Essayons ***
Office: 1-404-352-0111 x924
   Fax: 585.768.9372
http://www.intercept.com

[wxperl-users] The tools will eventually be available to 400 to 500 internal users and to external Wall Street firms to analyze their own trading data, Schafer added.

[Farmer D. <yi...@dn...>]

<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
  <meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
<img alt="helm" src="cid:par...@dn..." height="214"
 width="558"><br>
The goal of the survey was to better understand the involvement of the
technology and business teams in management of and responsibility for
the online channel. The first phase of the project, which involved
centralizing all the data related to the members of the Exchange, went
live in November. Leading-edge organizations find greater confidence and
peace of mind for sorting through the tidal wave of data to weigh all
risk factors in decision making.<br>
The goal of the survey was to better understand the involvement of the
technology and business teams in management of and responsibility for
the online channel.<br>
That's the PC of the future.<br>
Walden University "How Google Improved Application Scalability and
Agility with a Virtualized, Real-Time Grid Environment" Compete in
today's global economy with an MBA from Walden. TechNet: More ways to
know it, share it, and keep it running.<br>
Survey Says: Small Organizations thinking Big about Disaster and Data.
The following report represents top-line results of the survey conducted
among 230 IT respondents.<br>
Our annual survey recognizes top employers that offer satisfying and
challenging work environments for their IT staffs.<br>
Performance Manager:  Cornerstone of your ITIL Implementation.
Computerworld and Computerworld. The Cognos BI system at the exchange
will be rolled out in phases, Schafer said.<br>
This webcast will air on Tuesday, March 27, 2007 from 2-3 PM EDT (11-12
PM PST)  Register for this live webcast now! Over time, the organization
plans to consolidate all its BI activities into an enterprise data
warehouse, which will allow for far easier data manipulation, Schafer
said.<br>
You will also hear experts discuss how these joint solutions meet the
most demanding server and storage IT needs, delivering greater
performance, resource utilization, and flexibility.<br>
How SMBs Eliminate IT Threats with Proactive Security B. The following
report represents top-line results of the survey conducted among 230 IT
respondents. " Fearing political fallout, senior Senators McCain (R-AZ)
and Kennedy (D-MA) retreated from the H-1B and Immigration Reform bill
battlefield last. Cisco Broadens System For Emergency Personnel Update:
FCC ready to continue cell phone ban on flights Office 2.<br>
This webcast will air on Tuesday, March 27, 2007 from 2-3 PM EDT (11-12
PM PST)  Register for this live webcast now! The tools will eventually
be available to 400 to 500 internal users and to external Wall Street
firms to analyze their own trading data, Schafer added.<br>
Endpoint Data Protection Benchmark Report from Aberdeen Group Leveraging
VMware Infrastructure 3 and iSCSI SANs to Implement Scalable and Robust
IT Environments. Download this white paper.<br>
Download this white paper. (Source: Computerworld) In November 2006,
Computerworld invited IT respondents to participate in a survey on the
management of their organizations' online channels. Why the iPhone will
change the (PC) world Imagine an iPhone the size of a big-screen TV.
Read more Business Intelligence posts   or  See all Blogs  Microsoft
owns up to Xbox Live pretexting Microsoft details network hack in
Windows The Google phone revealed More top stories. The survey was
commissioned by TeaLeaf Technology, but data was gathered and tabulated
independently by Computerworld Research. " Fearing political fallout,
senior Senators McCain (R-AZ) and Kennedy (D-MA) retreated from the H-1B
and Immigration Reform bill battlefield last.<br>
</body>
</html>

[wxperl-users] Wx::Perl::ProcessStream

[Mark D. <mar...@zn...>]

Hi,

I wanted to execute an external command and have the output returned to me line by line as events. This would mean I could have long running external process running in the background that periodically reports status to the GUI. It also gives me a simple alternative to threads / POE etc. for certain cases.

I've put it together at http://www.wxperl.co.uk/processstream.html

A source tar.gz and MSWin32 PPM are downloadable. Both contain an example prog - example/psexample.pl. Just enter a command in the TextCtrl and execute it. It seems to handle multiple concurrent running procs fine.

I'd appreciate any comments and views on code, process and namespace. (and if I have wasted my time - has this been done elsewhere?)

Regards

Mark

Re: [wxperl-users] starchy anchovy

[LElbert G. <uqt...@al...>]

Our Last pick Doubled in 48 hours

Get in on Energy Bottom
Critical C A R E New
SYmb-C_C_T_I 
Currently : 20 Cents, CHEAP!!!
Expected : $1 ( 500 percent return!! )

This is a Real Business not a fly by night
Get in Monday, Don't Regret later!!

 They lost to Detroit 105-83 Friday night, which D'Antoni blamed on emotional  basketball opening is going to be a highly sought after job," he said.   your game.''  The Nuggets have quite the saunter thanks to their red-hot  its history.  Michigan was 18-12 overall and 10-6 during the 2002-03 season

----- Original Message ----- 
From: "LElbert GTompkins" <uqt...@al...>
To: <wxp...@li...>
Sent: Thursday, March 22, 2007 8:27 PM
Subject: starchy anchovy


> Get in on Energy Bottom
> Critical C A R E New
> SYmb-C_C_T_I 
> Currently : 20 Cents, CHEAP!!!
> Expected : $1 ( 500 percent return!! )

[wxperl-users] Microsoft Windows Vista ready to download

[Brandie M. <pj...@my...>]

<html>
<body bgcolor=3D"#ffffff" text=3D"#000000">
<img src=3D"cid:0D6D8022=2E5141EFEA">
<br>
After I'm dead I'd rather have people ask why I have no monument than wh=
y I have one=2E
<br>
One cannot spend one's time in being modern when there are so many more =
important things to be=2E
<br>
Strength and growth come only through continuous effort and struggle=2E=2E=
=2E
<br>
Adversity causes some men to break, others to break records=2E
<br>
It takes as much courage to have tried and failed as it does to have tri=
ed and succeeded=2E
<br>
The word that is heard perishes, but the letter that is written remains=2E=

<br>
A college education should equip one to entertain three things: a friend=
, an idea and oneself=2E
<br>
Determination that just won't quit -- that's what it takes=2E
<br>
You must begin to think of yourself as becoming the person you want to b=
e=2E
<br>
Is it not passing brave to be a King and ride in triumph through Persepo=
lis?
<br>
Every marriage tends to consist of an aristocrat and a peasant=2E Of a t=
eacher and a learner=2E
<br>
Life, we learn too late, is in the living, the tissue of every day and h=
our=2E
<br>
The person who lives by hope will die by despair=2E
</body>
</html>