Unfortunately, the standalone runtimes are 75% of that package, no matter which packager you use. Even though they really just zip up the files and then temporarily extract them and spit them through the runtime, you can only pack the xs so far. If someone packed perl into a .net clr it would work so much cleaner, but then the user would still need that runtime!
On 3/10/09, Raphael Stoeckli <win32...@rabanti.ch> wrote: > Hi Zak > > I run probably an old version of ASPerl (5.8.6.811). There is an error, when > I try to run test8.pl or test13.pl. Hook ‘Perl_newXS_flags’ was not found in > perl58.dll. I think, I remained on 5.8.6.811, because of some > PAR-compatibility-issues (most likely obsolote now). I will try it on an > other machine with 5.8.8 or 5.10 the next days. > My program works now pretty good, without much flickering, only with > win32-GUI-corefunctions. I will also try to move my window-DC into a > memory-DC the next days, as I said in my last post. I will post some > sample-code when I finished that. > To tell the truth, DIBitmap and GD frighten me a little bit. Is not that I > don't understand it – already worked with DIBitmap intensively. But my > program will be a standalone-binary for PCs without Perl. Even though > 1TB-HDDs are on the advance, I am still skeptic if I have a binary of more > than 3 or 4 MB in front of me, to run a really simple program. Maybe I am > too conservative :-) > > Anyhow, much thanks for your hint. I will also study the two posts from > mail-archive.com. > > Greetings, > Raphael > > -----Ursprüngliche Nachricht----- > Von: zak3 [mailto:zak31...@.....com] > Gesendet: Montag, 9. März 2009 12:57 > An: perl-win32-gui-users@lists.sourceforge.net > Betreff: Re: [perl-win32-gui-users] flickering static-DC > > > Hi > also look to this link about drawing and refreshing: > http://www.nabble.com/Draw-on-click-and-refresh-the-window---resolved-td1809 > 3899.html > and the two tutorials by rob may about drawing and refreshing: > http://www.mail-archive.com/perl-win32-gui-users@lists.sourceforge.net/msg05 > 194.html > http://www.mail-archive.com/perl-win32-gui-users@lists.sourceforge.net/msg05 > 195.html > > also before three days i have found an example in the win32gui demos : > demos\DIBitmap\ the first is test8.pl and test13.pl they draw a circle > without any flickering, they use GD graphics with DIBitmap, first install GD > Graphics from this site:http://www.bribes.org/perl/ppmdir.html > using the command: > ppm install http://www.bribes.org/perl/ppm/GD.ppd > and try the test8.pl and test13.pl, the GD graphics have many plotting > statements for drawing lines, polygons, points, etc > > > Raphael Stoeckli wrote: >> >> Hi @ all >> >> I try to plot a static DC-Object (means: the graphic is calculated >> uniquely >> at runtime, depending of several parameters, and does not change while >> displaying the window) in a window. >> The problem is that this object continuously needs to be redrawn, because >> it >> vanishes during moving the window around, or if an other window is moving >> over it. >> I thought, a repaint-routine like that would solve the problem: >> ------------------------------------- >> use strict; >> use Win32::GUI(); >> our $WIN; >> our %DC; >> >> &build_gui; >> Win32::GUI::Dialog(); >> >> sub build_gui # Building the GUI >> { >> $WIN = new Win32::GUI::Window( >> -left => 200, -top => 200, -width => 300, -height => 300, >> -name => "WIN", >> -text => "Static-DC-Test", >> #-noflicker => 1, # Useless/worse result >> ); >> $WIN->Show(); >> $DC{'color'}{'white'} = [255,255,255]; >> $DC{'color'}{'red'} = [255,0,0]; >> $DC{'pen'} = new Win32::GUI::Pen( -color => $DC{'color'}{'red'}, -width => >> 3, ); >> $DC{'brush'} = new Win32::GUI::Brush( -color => $DC{'color'}{'white'}, >> -width => 1, ); >> &repaint; >> $DC{'timer'} = $WIN ->AddTimer("timer", 100); >> } >> >> sub ::timer_Timer # Repaint DC with interval of 'timer' >> { &repaint; } >> >> sub WIN_Terminate { return -1; } >> >> sub repaint # Create/rebuild DC-Object >> { >> $DC{'dc'}{'object'} = $WIN -> GetDC; >> $DC{'dc'}{'object'} -> FillRect(10, 10, 280, 260,$DC{'brush'}); >> $DC{'dc'}{'object'} -> SelectObject($DC{'pen'}); >> $DC{'dc'}{'object'} -> BeginPath(); >> $DC{'dc'}{'object'} -> MoveTo(10, 10); >> $DC{'dc'}{'object'} -> LineTo(280, 260); >> $DC{'dc'}{'object'} -> EndPath(); >> $DC{'dc'}{'object'} -> StrokePath(); >> #$DC{'dc'}{'object'} -> Save(); # ??? Save() --> Restore() ??? >> } >> ------------------------------------- >> But the result of the code above is a flickering, annoying graphic. >> So the next thought, was to generate a bitmap from the DC. There is, if >> I’m >> not wrong, a method with DIBitmap. But, I would like to refrain from >> binding >> in that module, only for converting a single graphic, because it’s >> bloating >> up the program/PAR-binary. >> >> >> Sadly, the DC-Documentation is frequent a sealed book for me. >> Does anyone know an easy method (I also like to take a complex solution >> :-)) >> to convert a DC into a bitmap-object, without using DIBitmap? Or, even >> better, a way to prevent that flickering during the repaint? >> >> Thanks a lot. >> >> Regards, >> Raphael >> >> >> > ---------------------------------------------------------------------------- > -- >> Open Source Business Conference (OSBC), March 24-25, 2009, San Francisco, >> CA >> -OSBC tackles the biggest issue in open source: Open Sourcing the >> Enterprise >> -Strategies to boost innovation and cut costs with open source >> participation >> -Receive a $600 discount off the registration fee with the source code: >> SFAD >> http://p.sf.net/sfu/XcvMzF8H >> _______________________________________________ >> Perl-Win32-GUI-Users mailing list >> Perl-Win32-GUI-Users@lists.sourceforge.net >> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users >> http://perl-win32-gui.sourceforge.net/ >> >> > > -- > View this message in context: > http://www.nabble.com/flickering-static-DC-tp22404906p22411762.html > Sent from the perl-win32-gui-users mailing list archive at Nabble.com. > > > ---------------------------------------------------------------------------- > -- > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Perl-Win32-GUI-Users@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > http://perl-win32-gui.sourceforge.net/ > > > ------------------------------------------------------------------------------ > Apps built with the Adobe(R) Flex(R) framework and Flex Builder(TM) are > powering Web 2.0 with engaging, cross-platform capabilities. Quickly and > easily build your RIAs with Flex Builder, the Eclipse(TM)based development > software that enables intelligent coding and step-through debugging. > Download the free 60 day trial. http://p.sf.net/sfu/www-adobe-com > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Perl-Win32-GUI-Users@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users > http://perl-win32-gui.sourceforge.net/ > -- Sent from my mobile device Maximus* WarheadsSE MaxSource ------------------------------------------------------------------------------ Apps built with the Adobe(R) Flex(R) framework and Flex Builder(TM) are powering Web 2.0 with engaging, cross-platform capabilities. Quickly and easily build your RIAs with Flex Builder, the Eclipse(TM)based development software that enables intelligent coding and step-through debugging. Download the free 60 day trial. http://p.sf.net/sfu/www-adobe-com _______________________________________________ Perl-Win32-GUI-Users mailing list Perl-Win32-GUI-Users@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users http://perl-win32-gui.sourceforge.net/
