RE: [perl-win32-gui-users] Button bitmap and icons

2005-12-30 Thread Ariel Serbin
there are programs that can extract the icons from the system dlls. check out this link: http://www.vbaccelerator.com/home/VB/Utilities/Icon_Extractor/article.asp and this link: http://www.vbaccelerator.com/home/VB/Utilities/Bitmap_Extractor/article.asp on a related note, i have always thought

Re: [perl-win32-gui-users] DIBitmap odd resize behaviour with TIFFs?

2005-11-16 Thread Ariel Serbin
hi, i cleaned up a DIBitmap app that i had to try showing how to "fit to screen". i wrote the app that i stole this from quite a while ago and i haven't looked into why the 'rotate' doesn't work. the "fitting" business seems to work, though... you can check it out at http://www.barrack.com/dib

[perl-win32-gui-users] Enhanced Listview Module

2005-10-13 Thread Ariel Serbin
Hi all, I've (mostly) completed a listview subclass that helps simplify dealing with listview data. It's primarily designed for data that is keyed by ID. The main tasks of the subclass are importing data, handling sorting, and retrieving the IDs/data of the selected items. See the attached exam

[perl-win32-gui-users] GUI Programming Job

2005-10-10 Thread Ariel Serbin
GUI Users, The law firm that I work for is expanding its tech department (i.e. me and the other guy) and has several large programming projects on the horizon. The most notable of these projects is a new case management system, which will be a large, complicated Windows program (or possibly a sui

Re: [perl-win32-gui-users] Re: Centering Win32::GUI::GetOpenFileName Dialog Box

2005-10-10 Thread Ariel Serbin
Thanks for the reply, but I'm still getting the usage errors with this script, no matter how I call Hook. With the attached file, I tried these 3 ways of calling it: #$win->Hook($win, WM_ENTERIDLE, \&Idle($win)); #$win->Hook(WM_ENTERIDLE, \&Idle($win)); Win32::GUI::Hook($win,WM_ENTERIDLE, \&Idle(

Re: [perl-win32-gui-users] Re: Centering Win32::GUI::GetOpenFileName Dialog Box

2005-10-09 Thread Ariel Serbin
GUI users, i'd appreciate it if someone more knowlegable could please have a look at the following code. i adapted it from the example that rob sent, but i keep getting a usage error on the hook line (in open_thumbnails), which says that it needs to be passed (handle, msg, codref). you'll see tha

Re: [perl-win32-gui-users] Attaching to a window created by some other application

2005-10-06 Thread Ariel Serbin
My opinion is that GuiTest is a weird mix of functions that are not really specific to testing. For that reason, it seems that the meat of those functions should reside in more appropriate modules (like Win32::GUI) and GuiTest (or any module specific to testing) should call those functions. That

Re: [perl-win32-gui-users] Re: Centering Win32::GUI::GetOpenFileName Dialog Box

2005-09-27 Thread Ariel Serbin
ND, 0x702C, 0); anyone have thoughts on this? -ariel --- Robert May <[EMAIL PROTECTED]> wrote: > Rob wrote: > > Does anyone know how I could center my > > Win32::GUI::GetOpenFileName dialog > > box in my window > > Ariel Serbin wrote: > > It would be v

[perl-win32-gui-users] drag/drop treeview questions

2005-09-26 Thread Ariel Serbin
I have two questions. I'm writing an app that helps people to assign files to categories and lets them order the files within those categories. I have set my app up to use a two-level treeview which shows the categories and the files within, like so: - Category 1 file1 file2 - Category 2 file

RE: [perl-win32-gui-users] Centering Win32::GUI::GetOpenFileName Dialog Box

2005-09-24 Thread Ariel Serbin
I actually have a very similar question to Rob's, though I'm pretty sure that it warrants the same response. I'm writing an app to automate some menial tasks for some photographer friends. Since the app only opens images, I have set the filter for GetOpenFileName accordingly. It would be very ni

[perl-win32-gui-users] Listview subitem colors (and related issues)

2005-09-17 Thread Ariel Serbin
I am working on a ListView subclass that will ease many (of my) common tasks. I've posted a more primitive version of this to this list before. I've been playing with the item coloring code that Rob posted a little while ago. I've been poking around msdn, trying to extract the subitem from the m

Re: [perl-win32-gui-users] Mixing OEM and NEM events [Was: working/not working timer]

2005-08-04 Thread Ariel Serbin
While I'm an avid user fo Win32::GUI, I don't know much about the internals... That being said, it does seem more intuitive to be able to assign callbacks to specific timers (as opposed to setting up a switch type dispatcher based on the timer name.) Basically, it would be like having an -onclick

Re: [perl-win32-gui-users] Button and RichEdit issues

2005-05-10 Thread Ariel Serbin
I had the same issue today with the richedit crashing. I found a post somewhere that said to call the richedit's DESTROY method before terminating. That worked for me. My code looks like this: sub Window_Terminate { $re->DESTROY; -1;} -Ariel --- [EMAIL PROTECTED] wrote: > Thank you e

Re: [perl-win32-gui-users] AxWindow Application Error

2005-05-09 Thread Ariel Serbin
Interestingly, this code does not produce the error: use Win32::OLE; my $view = Win32::OLE->new("MiDocViewer.MiDocView") or die Win32::OLE::LastError(); It seems to be something relating to how AxWindow releases the control. Unfortunately, I have no idea how to debug that sort of thing. I did s

RE: [perl-win32-gui-users] Simple Text

2005-05-07 Thread Ariel Serbin
t;; $lbl->Text($txt); } --- MJG <[EMAIL PROTECTED]> wrote: > Ok, that's cool, but let's say I want to fill the > entire window with > text. Do I use a label for each row, or is there > something I can use to > just fill the window? > > Thanks > > --

Re: [perl-win32-gui-users] Simple Text

2005-05-07 Thread Ariel Serbin
To add plain text, you can use a label: $W->AddLabel( -name => "mylabel1", -left => 10, -top => 150, -width=> 100, -height => 22, -text => "Some Text Here" ); --- MJG <[EMAIL PROTECTED]> wrote: > I have a sim

Re: [perl-win32-gui-users] AxWindow Application Error

2005-05-07 Thread Ariel Serbin
in32::GUI::Dialog(); to your > example) and it didn't crash > on exit - although I've no idea what the control > should be:) > > Have a play with undef'ing the window and controls > in various orders and see > if that makes any difference. > > Cheers

[perl-win32-gui-users] AxWindow Application Error

2005-05-07 Thread Ariel Serbin
I'm having a problem with AxWindow throwing an error when it quits. I'm embedding the Microsoft Office Document Imaging program into my app. When my program exits, i get a dialog box that reads: -- The instruction at "xx" referenced memory at "xx". The memory could not be "read".

[perl-win32-gui-users] AxWindow examples

2005-05-05 Thread Ariel Serbin
Does anyone have any axwindow examples that embed applications other that IE? I've gotten IE to work nicely, but have run into some weird behavior with Excel. Now I am specing an application which would need a viewer for a variety of document types. I would be interested in seeing examples for a

[perl-win32-gui-users] Listview double click

2005-03-29 Thread Ariel Serbin
Is there a double click event fired for listviews?

Re: [perl-win32-gui-users] wrappers revisited

2005-02-23 Thread Ariel Serbin
I made some changes to my wrapper module that I mentioned the other day. I had considered the sorting issues that Joe mentioned and added sorting routines similar to the code that he posted. The wrapper now has a sorting scheme that defaults to a regular cmp, but lets you pass in a sub to convert

Re: [perl-win32-gui-users] wrappers revisited

2005-02-22 Thread Ariel Serbin
--- Johan Lindstrom <[EMAIL PROTECTED]> wrote: > Have you considered subclassing Win32::GUI::ListView > and just add the > ability to specify an optional -id when adding an > Item? This would have the As someone who has come to rely pretty heavily on Win32::GUI, I did think about subclassing/mod

[perl-win32-gui-users] wrappers revisited

2005-02-22 Thread Ariel Serbin
I've been toying with the listview wrapper idea that I brought up last week. I threw together a module to show off the basic idea, though it needs to be reworked. I wanted to make it easy to set up a listview and keep track of the items by some id. When I started writing this, I used the hashref

Re: [perl-win32-gui-users] RegEx

2005-02-21 Thread Ariel Serbin
perlmonks.com is a great place to look for answers to questions like this. The quick answer to your question is: $stuff = 'Client/workstation///printserver/printer,winspool,ne01:'; my ($client, $station, $server, $printer, $spool, $otherthing) = ($stuff =~ m|(\w+)/(\w+)///(\w+)/(\w+),(\w+),(\w+

Re: [perl-win32-gui-users] Wrappers for listviews/comboboxes etc...

2005-02-15 Thread Ariel Serbin
Thanks for the responses... That's good to know about Text() on the comboboxes. I've been doing it the other way, as well. I'm not sure if there's any weirdness related to having the 0-width column because I always do fullrowselect. I've thought about the shadow array idea before and it is pro

[perl-win32-gui-users] Wrappers for listviews/comboboxes etc...

2005-02-14 Thread Ariel Serbin
Hi all, I've been using Win32::GUI for a while now and regularly scanning the archives of this list. At long last, I finally have something worth posting to the group about... In a number of my applications I have found that my lisview/comboboxes etc. tend to represent either a subset of a datab