Nabble - tcl-mac

Re: add window by clicking launcher

2009-12-20T13:51:47Z

Quoting Jasper Taylor <jasper@...>:

> However the normal Mac app behaviour, as far as I can tell, is to open a
> new window when the app launch action is done, if it is already running.

Yep, this is stipulated by the HIG.

> It seems the way to get this to happen is to use tclAE and install an
> event handler, but so far I have not succeeded in getting a procedure
> called by registering it with tclAE::installEventHandler. Can anyone
> give me a clue that might help?

You should be able to call

tclAE::installEventHandler aevt rapp myHandleReOpenApp

proc myHandleReOpenApp {theAppleEvent theReplyAE} {
if <there are no windows> {
<make a new window>
}
}

This is what we do in Alpha, although it has a preference to prevent
it because, although mandated by the HIG, too many users found it
annoying. It depends on the app, though, how obtrusive this behavior is.

The myHandleReOpenApp handler can usually do double duty with your
oapp handler, if you have one.

------------------------------------------------------------------------------
This SF.Net email is sponsored by the Verizon Developer Community
Take advantage of Verizon's best-in-class app development support
A streamlined, 14 day to market process makes app distribution fast and easy
Join now and get one step closer to millions of Verizon customers
http://p.sf.net/sfu/verizon-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: add window by clicking launcher

2009-12-18T12:40:06Z

Hi,

Tk already supports telling you when your dock is being clicked.. just define a proc with :

proc ::tk::mac::ReopenApplication { } {

# your dock was clicked! do something!

}

Hope that helps.

KaKaRoTo

On Fri, Dec 18, 2009 at 12:48 PM, Jasper Taylor <jasper@...> wrote:

Hi Folks,
Being unused to the Mac way of doing things, I often close the last
window in my app by clicking its 'close' decoration (red X button at the
top left). This closes the window but does not quit the application.
After a while I may try to launch it again by clicking the app icon. At
this point, nothing happens, causing consternation until I remember that
I am on the Mac and actually something has happened -- my app's menu is
now at the top of the screen. I can then open a new window from the menu.

However the normal Mac app behaviour, as far as I can tell, is to open a
new window when the app launch action is done, if it is already running.
It seems the way to get this to happen is to use tclAE and install an
event handler, but so far I have not succeeded in getting a procedure
called by registering it with tclAE::installEventHandler. Can anyone
give me a clue that might help?
Cheers
--Jasper

------------------------------------------------------------------------------
This SF.Net email is sponsored by the Verizon Developer Community
Take advantage of Verizon's best-in-class app development support
A streamlined, 14 day to market process makes app distribution fast and easy
Join now and get one step closer to millions of Verizon customers
http://p.sf.net/sfu/verizon-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

------------------------------------------------------------------------------
This SF.Net email is sponsored by the Verizon Developer Community
Take advantage of Verizon's best-in-class app development support
A streamlined, 14 day to market process makes app distribution fast and easy
Join now and get one step closer to millions of Verizon customers
http://p.sf.net/sfu/verizon-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

add window by clicking launcher

2009-12-18T09:48:47Z

Hi Folks,
Being unused to the Mac way of doing things, I often close the last
window in my app by clicking its 'close' decoration (red X button at the
top left). This closes the window but does not quit the application.
After a while I may try to launch it again by clicking the app icon. At
this point, nothing happens, causing consternation until I remember that
I am on the Mac and actually something has happened -- my app's menu is
now at the top of the screen. I can then open a new window from the menu.

However the normal Mac app behaviour, as far as I can tell, is to open a
new window when the app launch action is done, if it is already running.
It seems the way to get this to happen is to use tclAE and install an
event handler, but so far I have not succeeded in getting a procedure
called by registering it with tclAE::installEventHandler. Can anyone
give me a clue that might help?
Cheers
--Jasper

------------------------------------------------------------------------------
This SF.Net email is sponsored by the Verizon Developer Community
Take advantage of Verizon's best-in-class app development support
A streamlined, 14 day to market process makes app distribution fast and easy
Join now and get one step closer to millions of Verizon customers
http://p.sf.net/sfu/verizon-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Subview for Tkdnd is too small

2009-12-18T07:30:07Z

Hi all,

I'm continuing to make progress with porting TkDND to the Mac--if you
look at https://sourceforge.net/projects/tkdnd/, you'll see several
recent commits. Right now, with George Petasis' help, I've implemented
dragging text and files to a tk widget from the Finder. There's more
work to do on binding for specific events, but things are moving along
well.

I am running into an issue with a widget that has been registered as a
drop target. My basic design, as suggested by Daniel Steffen, is to add
a custom subview to an NS/Tk window to serve as the drop target. I can
do this, but for some reason the subview does not take up the entire
toplevel window (as was my idea). The code below, based on Daniel's
webkit view code sample, should draw the custom subview to the be same
size as the toplevel window. However, what I've found is that it draws a
200x200 view anchored to the lower left-hand-corner of the window.

Shouldn't the Tk_Width and Tk_Height calls return the width and height
of the Tk toplevel?

In any event, advice on the code below is appreciated. --Thanks, Kevin

-----

//get NSView from Tk window and add subview to serve as drop target
DNDView *dropview = [[DNDView alloc] init];
NSView *view = TkMacOSXGetRootControl(d);
if ([dropview superview] != view) {
[view addSubview:dropview positioned:NSWindowBelow relativeTo:nil];
}

TkMacOSXWinBounds((TkWindow*)path, &bounds);
frame = NSMakeRect(bounds.left, bounds.top, Tk_Width(path),
Tk_Height(path));
frame.origin.y = [view bounds].size.height -
(frame.origin.y + frame.size.height);
if (!NSEqualRects(frame, [dropview frame])) {
[dropview setFrame:frame];
}
[dropview displayRectIgnoringOpacity:[dropview bounds]];
[view unlockFocus];

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
This SF.Net email is sponsored by the Verizon Developer Community
Take advantage of Verizon's best-in-class app development support
A streamlined, 14 day to market process makes app distribution fast and easy
Join now and get one step closer to millions of Verizon customers
http://p.sf.net/sfu/verizon-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Post popup menu if Tk-Cocoa window is not frontmost?

2009-12-13T16:52:21Z

Hi all,

I'm working on integrating Youness Alaoui's very nice statusicon
extension into my own applications, and I'm running into a problem.
Basically, the way the statusicon extension works is by posting a
tk_popup menu when a mouse-click event occurs over the statusicon
(actually an NSStatusitem). This works fine with Tk-Carbon, and works
equally well whether the Tk application is frontmost or not. It's an
effective implementation of the NSStatusItem into Tk.

However, with Tk-Cocoa, things don't work as well if the application
isn't frontmost. If I click on the statusicon if Wish is not frontmost,
I get this error:

while executing
"$menu post $x $y"
(procedure "tk::PostOverPoint" line 31)
invoked from within
"tk::PostOverPoint $menu $x $y $entry"
(procedure "tk_popup" line 7)
invoked from within
"tk_popup $iconmenu [winfo pointerx .] [winfo pointery .]"
(procedure "statusicon_callback" line 6)
invoked from within
"statusicon_callback ACTION"
("eval" body line 1)
invoked from within
"eval statusicon_callback ACTION"

After doing some digging into the source code for both statusicon and
Tk-Cocoa (tkMacOSXMenu.c), it appears that the menu can't post if the Tk
window isn't frontmost. Here's the relevant code:

NSWindow *win = [NSApp keyWindow];
if (win) {
inPostMenu = 1;
int oldMode = Tcl_SetServiceMode(TCL_SERVICE_NONE);
NSView *view = [win contentView];
NSRect frame = NSMakeRect(x + 9, tkMacOSXZeroScreenHeight - y - 9, 1, 1);
frame.origin = [view convertPoint:
[win convertScreenToBase:frame.origin] fromView:nil];
NSMenu *menu = (NSMenu *) menuPtr->platformData;
NSPopUpButtonCell *popUpButtonCell = [[NSPopUpButtonCell alloc]
initTextCell:@"" pullsDown:NO];
[popUpButtonCell setMenu:menu];
[popUpButtonCell selectItem:nil];
[popUpButtonCell performClickWithFrame:frame inView:view];
[popUpButtonCell release];
Tcl_SetServiceMode(oldMode);
inPostMenu = 0;
return TCL_OK;
} else {
return TCL_ERROR;
}

Tk is looking for the frontmost window, i.e. the [NSApp keyWindow], and
if it can't find it, returns a TCL_ERROR with no message.

Is this a bug, or a design decision? It seems unfortunate that the popup
menu doesn't work as effectively in Tk-Cocoa as it does in Tk-Carbon,
and I have no idea whether this can be adjusted without breaking
something else.

In any event, this can certainly be worked around with some AppleScript
calls to make sure the application is frontmost, but it would be nice to
be able to post the popup menu even if the app is not frontmost--just as
it is possible with Tk-Carbon.

Advice is appreciated.

Thanks,
Kevin

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Return on Information:
Google Enterprise Search pays you back
Get the facts.
http://p.sf.net/sfu/google-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: ANN: Cocoa-based extensions for Tk-Cocoa

2009-12-11T20:23:31Z

On 12/11/09 11:17 PM, Damon Courtney wrote:
> Congratulations, Kevin, and thank you! Some very useful packages, and
> I'm very glad to see how far you've come with your Tk / Cocoa
> programming. Very exciting stuff. 0-]

Thanks, Damon.
>
> I see you've also made great progress on TkDND. Any chance you'll be
> sharing that work soon? If you share some work in progress, some of
> the rest of us might be able to chip in. I know you're probably
> reluctant to do that because I'm the same way. I have a hard time
> letting go until I think things are perfect, but I've definitely found
> over the years that that's not the best approach.

I'm working now with George Petasis on getting my stuff merged into
TkDND itself. He's doing more of the integration work at this point,
since he knows his own API better than me. :-)

There are some recent commits here:

https://sourceforge.net/projects/tkdnd/

Not sure when it will be fully ready, but hopefully soon. I'll post some
news when it is.

>
> Thanks again for all the hard work. I know you do it for you first,
> but let me personally thank you for contributing this work back to the
> community. The Tcl community may be a small one compared to some, but
> we share a lot. A rising tide lifts all boats, so to speak.

Thanks again!

Kevin

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Return on Information:
Google Enterprise Search pays you back
Get the facts.
http://p.sf.net/sfu/google-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: ANN: Cocoa-based extensions for Tk-Cocoa

2009-12-11T20:17:39Z

Congratulations, Kevin, and thank you! Some very useful packages, and
I'm very glad to see how far you've come with your Tk / Cocoa
programming. Very exciting stuff. 0-]

I see you've also made great progress on TkDND. Any chance you'll be
sharing that work soon? If you share some work in progress, some of
the rest of us might be able to chip in. I know you're probably
reluctant to do that because I'm the same way. I have a hard time
letting go until I think things are perfect, but I've definitely found
over the years that that's not the best approach.

Oh, and I would think about a github account. Wave of the future, my
friend. 0-]

Thanks again for all the hard work. I know you do it for you first,
but let me personally thank you for contributing this work back to the
community. The Tcl community may be a small one compared to some, but
we share a lot. A rising tide lifts all boats, so to speak.

D

On Dec 11, 2009, at 9:04 PM, Kevin Walzer wrote:

> I'm pleased to announce the release of three Mac-platform-native
> Tk-extensions that build on the Cocoa frameworks to integrate with the
> new Cocoa-based version of Tk for the Mac.
>
> Macsheet
>
> This package implements Mac-native "sheet" windows for Tk. "Sheet"
> windows are dialogs or toplevel windows that slide down from the top
> of
> a Mac toplevel window, and then slide back up when they are dismissed.
> Tk on the Mac has long supported the "sheet" effect for system
> dialogs,
> such as tk_messageBox, when a "-parent" option is passed to the call.
> The macsheet package adds the ability to create customized dialogs or
> windows with a similar effect.
>
> Tkdock
>
> The tkdock package allows a Tcl/Tk application to manipulate the Dock
> icon. The package allows an application to change its icon on the OS X
> Dock while running; it also allows the application to set a badge
> label
> to the Dock.
>
> Tkmacicon
>
> The tkmacicon package renders platform-native icons on OS X as Tk
> images. The ::tkmacicon::retrieveicon command takes three arguments: a
> file path or file extension, width, and height. If a file path is
> specified, then the package will return the specific icon for that
> file
> as defined by the Mac OS, in the width and height specified in the
> arguments. If a file extension is specified, then the package will
> return the specific icon for that file type as defined by the Mac
> OS, in
> the width and height specified in the arguments. Specifying the file
> extension rather than the actual file can yield faster performance for
> large numbers of files.
>
> All three packages are available at
> http://tk-components.sourceforge.net/ and are licensed under Tcl's
> BSD-style license. Both file releases and SVN downloads are available.
> In addition to source code, the packages include demo scripts and
> man pages.
>
> These extensions require Tk-Cocoa to run; they are not compatible with
> the older version of Tk based on the Mac's Carbon framework. Tk 8.6
> for
> the Mac is based on Cocoa, and a backport of Tk-Cocoa to 8.5 is
> available at http://github.com/das/tcltk/tree/de-carbon-8-5.
>
> Enjoy,
> Kevin Walzer
>
> --
> Kevin Walzer
> Code by Kevin
> http://www.codebykevin.com
>
> ------------------------------------------------------------------------------
> Return on Information:
> Google Enterprise Search pays you back
> Get the facts.
> http://p.sf.net/sfu/google-dev2dev
> _______________________________________________
> Tcl-mac mailing list
> tcl-mac@...
> https://lists.sourceforge.net/lists/listinfo/tcl-mac

------------------------------------------------------------------------------
Return on Information:
Google Enterprise Search pays you back
Get the facts.
http://p.sf.net/sfu/google-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

ANN: Cocoa-based extensions for Tk-Cocoa

2009-12-11T19:04:23Z

I'm pleased to announce the release of three Mac-platform-native
Tk-extensions that build on the Cocoa frameworks to integrate with the
new Cocoa-based version of Tk for the Mac.

Macsheet

This package implements Mac-native "sheet" windows for Tk. "Sheet"
windows are dialogs or toplevel windows that slide down from the top of
a Mac toplevel window, and then slide back up when they are dismissed.
Tk on the Mac has long supported the "sheet" effect for system dialogs,
such as tk_messageBox, when a "-parent" option is passed to the call.
The macsheet package adds the ability to create customized dialogs or
windows with a similar effect.

Tkdock

The tkdock package allows a Tcl/Tk application to manipulate the Dock
icon. The package allows an application to change its icon on the OS X
Dock while running; it also allows the application to set a badge label
to the Dock.

Tkmacicon

The tkmacicon package renders platform-native icons on OS X as Tk
images. The ::tkmacicon::retrieveicon command takes three arguments: a
file path or file extension, width, and height. If a file path is
specified, then the package will return the specific icon for that file
as defined by the Mac OS, in the width and height specified in the
arguments. If a file extension is specified, then the package will
return the specific icon for that file type as defined by the Mac OS, in
the width and height specified in the arguments. Specifying the file
extension rather than the actual file can yield faster performance for
large numbers of files.

All three packages are available at
http://tk-components.sourceforge.net/ and are licensed under Tcl's
BSD-style license. Both file releases and SVN downloads are available.
In addition to source code, the packages include demo scripts and man pages.

These extensions require Tk-Cocoa to run; they are not compatible with
the older version of Tk based on the Mac's Carbon framework. Tk 8.6 for
the Mac is based on Cocoa, and a backport of Tk-Cocoa to 8.5 is
available at http://github.com/das/tcltk/tree/de-carbon-8-5.

Enjoy,
Kevin Walzer

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Return on Information:
Google Enterprise Search pays you back
Get the facts.
http://p.sf.net/sfu/google-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

using an NSOpenGLView in a Tk canvas

2009-12-11T14:14:44Z

Hi all,

I'm working on a Tk canvas extension that uses OpenGL for the rendering of textured polygons, etc... This is already implemented on Mac OS X (Carbon), X11 and Windows. It is available from there:

http://gil.imag.fr/Doc/TclCanvas

I'm trying to have this running on Tk-Cocoa (Tk8.5.8 de-carbon). But I didn't succeed in having the simplest OpenGL rendering displayed in the canvas window. So I'm looking for help. I'm new to Objective-C / Cocoa.

The following is the code that replaces the standard canvas drawing code in the "Display" function of tkCanvas.c (i.e. it replaces the lines from
canvasPtr->drawableXOrigin = canvasPtr->xOrigin;
to
TkpClipDrawableToRect(Tk_Display(tkwin), pixmap, 0, 0, -1, -1);
).

NSView* contentView = TkMacOSXDrawableView ((MacDrawable*)(((TkWindow*)tkwin)->privatePtr));

if (theView == (gilTcl_TOpenGLView*)NULL) {
NSRect frame;
frame.origin.x = Tk_X (tkwin);
frame.origin.y = Tk_Height (Tk_Parent (tkwin));
frame.size.width = Tk_Width (tkwin);
frame.size.height = Tk_Height (tkwin);

theView = [[gilTcl_TOpenGLView alloc] initWithFrame: frame];
[contentView addSubview:theView];
[theView release];
}

[theView drawRect: [theView bounds]];

where "theView" is a global initialized to NULL.

And here's the drawRect method:

- (void)drawRect:(NSRect)bounds
{
(void)bounds;

glClearColor (0, 1.0, 0, 0);
glClear (GL_COLOR_BUFFER_BIT);
glFlush ();

[[self openGLContext] flushBuffer];
}

This compiles fine, but there is nothing displayed. The drawing should fill the canvas with green pixels. I tried my gilTcl_TOpenGLView class on a basic AppKit example, it works.

Thanks for any help.

François

------------------------------------------------------------------------------
Return on Information:
Google Enterprise Search pays you back
Get the facts.
http://p.sf.net/sfu/google-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: Crash in .app

2009-12-11T09:34:59Z

Hi Damon,

On Dec 11, 2009, at 9:06 AM, Damon Courtney wrote:

> In fact, if I run ./Installer.app/Contents/MacOS/installer from the
> command line, it works just fine. If I then run "open Installer.app"
> I get a boom.

that doesn't sound familiar, please provide a crash log.

Thanks

Daniel

------------------------------------------------------------------------------
Return on Information:
Google Enterprise Search pays you back
Get the facts.
http://p.sf.net/sfu/google-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Crash in .app

2009-12-11T09:06:25Z

I'm working on upgrading the Tcl/Tk version in InstallJammer 1.3, and
I've been mostly using the stable 8.5 branch as it gets updated. I
recently upgraded my build to include the 8.6 CVS snapshot to get a
look at some of the new stuff, and I find myself getting a crash but
only when I run from a .app bundle.

In fact, if I run ./Installer.app/Contents/MacOS/installer from the
command line, it works just fine. If I then run "open Installer.app"
I get a boom. I realize that my builds are sort of specialized in
that they are self-contained binaries, but I was just wondering if
anyone else had noticed any sort of similar behavior.

When I downgrade back to 8.5.8, I get no crash. I can try the 8.6
beta 1 if that would help narrow things down a bit. Oh, also, I am
NOT using the Cocoa build. I'm still doing --enable-aqua=carbon for
now. I plan to use the Cocoa build in the future alongside a carbon
version for legacy support, but for now, I just wanted to see the
thing built as it has been.

Anyone?

D

------------------------------------------------------------------------------
Return on Information:
Google Enterprise Search pays you back
Get the facts.
http://p.sf.net/sfu/google-dev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: Help tracing Tk execution

2009-12-09T09:50:58Z

Ok, found it, sorry for the noise.

I had the "Load symbols lazily" activated in <Preferences><Debugging>. Bad.

On Dec 6, 2009, at 10:11 AM, François Bérard wrote:

> Hi,
>
> I've been fighting quite a bit, but I can't manage to get XCode to break at my breakpoints when trying to trace Tk execution.
>
> I'm building Tcl/Tk8.5.8 (Tk-decarbon). I'm using the Wish.xcodeproj projects in the hope of using XCode nice debugger (XCode 3.2.1 on Mac OS X 10.6.2).
>
> I build the default target (Tk) in the DebugNoFixZL configuration. I put some breakpoints in the source tree. I "Debug - breakpoints on", Wish.app launches and loads the freshly build Tk framework (checked by setting DYLD_PRINT_LIBRARIES), but the program won't break at any of my breakpoints.
>
> In the "Breakpoint window", my breakpoints remain in grey, as if XCode didn't recognize that the library has been loaded.
>
> What am I doing wrong?
>
> Thanks,
>
> François
>
>
> ------------------------------------------------------------------------------
> Join us December 9, 2009 for the Red Hat Virtual Experience,
> a free event focused on virtualization and cloud computing.
> Attend in-depth sessions from your desk. Your couch. Anywhere.
> http://p.sf.net/sfu/redhat-sfdev2dev
> _______________________________________________
> Tcl-mac mailing list
> tcl-mac@...
> https://lists.sourceforge.net/lists/listinfo/tcl-mac

Help tracing Tk execution

2009-12-06T07:11:36Z

Hi,

I've been fighting quite a bit, but I can't manage to get XCode to break at my breakpoints when trying to trace Tk execution.

I'm building Tcl/Tk8.5.8 (Tk-decarbon). I'm using the Wish.xcodeproj projects in the hope of using XCode nice debugger (XCode 3.2.1 on Mac OS X 10.6.2).

I build the default target (Tk) in the DebugNoFixZL configuration. I put some breakpoints in the source tree. I "Debug - breakpoints on", Wish.app launches and loads the freshly build Tk framework (checked by setting DYLD_PRINT_LIBRARIES), but the program won't break at any of my breakpoints.

In the "Breakpoint window", my breakpoints remain in grey, as if XCode didn't recognize that the library has been loaded.

What am I doing wrong?

Thanks,

François

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: NSCFString error in Tk-Cocoa

2009-12-05T01:48:52Z

Hi,

> I have a 10.5.8 user reporting an uncaught Objective-C exception in one
> of my programs that runs on Tk-Cocoa 8.5.7. The error log causes my
> application to crash, with the messages below logged to Console:

> The error occurs when the user is typing a password into a ttk::entry
> field. The relevant code is below:
>
> ttk::entry .password.top.entry -show \u2022 -textvariable
> authorize::password

This sounds like what I experienced when entering a circumflex (^) in an entry on Tk 8.6b1.1.
It works on 8.5.8 though. I have filed a bug about this:

http://sourceforge.net/tracker/?func=detail&atid=112997&aid=2907388&group_id=12997

Torsten
------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: TCL 8.5 and MacOS 10.3.9

2009-12-03T12:56:05Z

Dear Jasper,

Jasper Taylor wrote:
> You need to give the compiler switch:
> -mmacosx-version-min=10.3

Thanks Jasper. I'll give that a shot. I'm still working on 10.4, so
should be able to compile for all.

Yours, Kevan

--
Kevan Hashemi, Electrical Engineer
Physics Department, Brandeis University
http://alignment.hep.brandeis.edu/

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

TCL 8.5 and MacOS 10.3.9

2009-12-03T05:04:30Z

Hi,

One of my users has a 10.3.9 machine and claims that our code, which
runs on top of TCL 8.5.5, won't start up. I don't have any 10.3.9
machines left to confirm or deny her claim. This 8.5.5 is one I compiled
from sources myself.

I doubt any of you have 10.3.9 machines either, but I'm just wondering:
is there a special compiler directive or makefile option I need to
specify during compilation to make the code compatible with 10.3.9?

Yours, Kevan

--
Kevan Hashemi, Electrical Engineer
Physics Department, Brandeis University
http://alignment.hep.brandeis.edu/

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

NSCFString error in Tk-Cocoa

2009-12-02T17:36:31Z

I have a 10.5.8 user reporting an uncaught Objective-C exception in one
of my programs that runs on Tk-Cocoa 8.5.7. The error log causes my
application to crash, with the messages below logged to Console:

09-12-02 15:16:21.598 PortAuthority[2071:10b] An uncaught exception was
raised
2009-12-02 15:16:21.601 PortAuthority[2071:10b] *** -[NSCFString
characterAtIndex:]: Range or index out of bounds
2009-12-02 15:16:21.602 PortAuthority[2071:10b] *** Terminating app due
to uncaught exception 'NSRangeException', reason: '*** -[NSCFString
characterAtIndex:]: Range or index out of bounds'

The error occurs when the user is typing a password into a ttk::entry
field. The relevant code is below:

ttk::entry .password.top.entry -show \u2022 -textvariable
authorize::password

I can't reproduce this on my 10.5.8 system, and the error does not
appear to be related to any of the other bugs that users have reported
with some of my Tk-Cocoa programs (conflicts with input managers,
conflicts between 64-bit and 32-bit libraries, etc.). I've also had this
code in the application for years, and it's never crashed before (with
Tk-Carbon or Tk-Cocoa).

I've found various references to "-[NSCFString characterAtIndex:]: Range
or index out of bounds" on Google, but there doesn't appear to be any
common pattern to them.

Any insight is appreciated.

--Kevin

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-12-01T17:14:34Z

Quoting Lloyd Wood <L.Wood@...>:

>
> On 1 Dec 2009, at 23:38, Kevin Walzer wrote:
>
>> On 12/1/09 1:54 PM, jguyer@... wrote:
>>> Quoting Kevin Walzer<kw@...>:
>>>
>>>> I noticed some recent SVN updates to TclAE (in September). Did all the
>>>> work stemming from the list traffic about TclAE over the summer result
>>>> in 64-bit compatability?
>>>
>>> I'm not sure what you're seeing, but there haven't been any SVN
>>> checkins since last March. I've not done any work on 64-bit.
>>
>> Whoops, I mistook a date of 2009/09/02 to mean September 2, 2009.
>
> ....which is exactly what it means in most of the world and in
> ISO8601 format.

You are (both) correctly interpreting the date. Just not the
significance of what happened that date:

---
TclAE
jguyer made 1 file-release changes.

2009-09-02 17:24:02 UTC by jguyer
---

A file-release change is not an SVN change; it's a change to what's
available in the Files tab. As I recall, I was getting rid of some
older versions that were still there.

>
> confused,
>
> L.
>
> <http://info.ee.surrey.ac.uk/Personal/L.Wood/><L.Wood@...>
>
>
>
>
>
>
>
> ------------------------------------------------------------------------------
> Join us December 9, 2009 for the Red Hat Virtual Experience,
> a free event focused on virtualization and cloud computing.
> Attend in-depth sessions from your desk. Your couch. Anywhere.
> http://p.sf.net/sfu/redhat-sfdev2dev
> _______________________________________________
> Tcl-mac mailing list
> tcl-mac@...
> https://lists.sourceforge.net/lists/listinfo/tcl-mac
>

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-12-01T15:52:58Z

On 1 Dec 2009, at 23:38, Kevin Walzer wrote:

> On 12/1/09 1:54 PM, jguyer@... wrote:
>> Quoting Kevin Walzer<kw@...>:
>>
>>> I noticed some recent SVN updates to TclAE (in September). Did all the
>>> work stemming from the list traffic about TclAE over the summer result
>>> in 64-bit compatability?
>>
>> I'm not sure what you're seeing, but there haven't been any SVN
>> checkins since last March. I've not done any work on 64-bit.
>
> Whoops, I mistook a date of 2009/09/02 to mean September 2, 2009.

...which is exactly what it means in most of the world and in ISO8601 format.

confused,

L.

<http://info.ee.surrey.ac.uk/Personal/L.Wood/><L.Wood@...>

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-12-01T15:38:46Z

On 12/1/09 1:54 PM, jguyer@... wrote:
> Quoting Kevin Walzer<kw@...>:
>
>> I noticed some recent SVN updates to TclAE (in September). Did all the
>> work stemming from the list traffic about TclAE over the summer result
>> in 64-bit compatability?
>
> I'm not sure what you're seeing, but there haven't been any SVN
> checkins since last March. I've not done any work on 64-bit.

Whoops, I mistook a date of 2009/09/02 to mean September 2, 2009. My bad.

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-12-01T10:54:27Z

Quoting Kevin Walzer <kw@...>:

> I noticed some recent SVN updates to TclAE (in September). Did all the
> work stemming from the list traffic about TclAE over the summer result
> in 64-bit compatability?

I'm not sure what you're seeing, but there haven't been any SVN
checkins since last March. I've not done any work on 64-bit.

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-12-01T10:47:18Z

Quoting Barry Skidmore <atri@...>:

> I think (not sure) that the app will have to be running during sleep
> wake to intercept an event yes?

Yes.

> So I believe that the reason for binding to sleep wake is at issue
> to provide a suitable solution.

Agreed.

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-12-01T10:38:34Z

I'm no TCLAE expert (I have hacked at it)

When using AppleScript to do the job I tied to the screensaver activate deactivate events.

I think (not sure) that the app will have to be running during sleep wake to intercept an event yes?

So I believe that the reason for binding to sleep wake is at issue to provide a suitable solution.

On Dec 1, 2009, at 6:25 AM, jguyer@... wrote:

> Quoting Barry Skidmore <atri@...>:
>
>> you can use applescript menu items to launch your app on wake/sleep.
>>
>> tcl itslef does not provide those bindinhs.
>
> You should be able to use TclAE to install AppleEvent handlers for
> those events, then. I'm at a conference and don't have time to
> research the details at the moment, but will try to find time in the
> next few days.
>
>
>
> ------------------------------------------------------------------------------
> Join us December 9, 2009 for the Red Hat Virtual Experience,
> a free event focused on virtualization and cloud computing.
> Attend in-depth sessions from your desk. Your couch. Anywhere.
> http://p.sf.net/sfu/redhat-sfdev2dev
> _______________________________________________
> Tcl-mac mailing list
> tcl-mac@...
> https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-12-01T08:02:05Z

On 12/1/09 9:25 AM, jguyer@... wrote:

Jon,

I noticed some recent SVN updates to TclAE (in September). Did all the
work stemming from the list traffic about TclAE over the summer result
in 64-bit compatability?

--Kevin

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-12-01T06:25:53Z

Quoting Barry Skidmore <atri@...>:

> you can use applescript menu items to launch your app on wake/sleep.
>
> tcl itslef does not provide those bindinhs.

You should be able to use TclAE to install AppleEvent handlers for
those events, then. I'm at a conference and don't have time to
research the details at the moment, but will try to find time in the
next few days.

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: sleep/wake events

2009-11-30T21:43:02Z

you can use applescript menu items to launch your app on wake/sleep.

tcl itslef does not provide those bindinhs.

Sent from my iPhone

On Nov 30, 2009, at 9:30 PM, Hans-Christoph Steiner <hans@...>
wrote:

>
> Hey all,
>
> I'd like to trigger an action when Mac OS X wakes up after sleeping.
> Is there a way to get sleep/wake events in Tcl?
>
> .hc
>
> ---
> ---
> ----------------------------------------------------------------------
>
> I have the audacity to believe that peoples everywhere can have three
> meals a day for their bodies, education and culture for their minds,
> and dignity, equality and freedom for their spirits. - Martin
> Luther King, Jr.
>
>
>
> ---
> ---
> ---
> ---------------------------------------------------------------------
> Join us December 9, 2009 for the Red Hat Virtual Experience,
> a free event focused on virtualization and cloud computing.
> Attend in-depth sessions from your desk. Your couch. Anywhere.
> http://p.sf.net/sfu/redhat-sfdev2dev
> _______________________________________________
> Tcl-mac mailing list
> tcl-mac@...
> https://lists.sourceforge.net/lists/listinfo/tcl-mac

sleep/wake events

2009-11-30T21:30:49Z

Hey all,

I'd like to trigger an action when Mac OS X wakes up after sleeping.
Is there a way to get sleep/wake events in Tcl?

.hc

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

I have the audacity to believe that peoples everywhere can have three
meals a day for their bodies, education and culture for their minds,
and dignity, equality and freedom for their spirits. - Martin
Luther King, Jr.

------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing.
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: Native custom sheets in Tk-Cocoa

2009-11-25T18:32:25Z

On 11/25/09 10:48 AM, Kevin Walzer wrote:

> I'm trying to implement an extension that draws custom sheets in
> Tk-Cocoa, so that a custom dialog or window can slide down from the top
> of the window, as they do with tk_messageBoxes that have a "-parent"
> flag set.
>
> I'm making some progress, but the outcome isn't what I expect. I can get
> the sheet to draw, but instead of animating, it completely overlays its
> parent window, and then blocks the application. Also, only the topmost
> widget in the sheet is displayed, i.e. a frame; its child widgets,
> including the button to close the sheet, are not drawn.
>
> It would be nice to get this working natively. I've actually developed a
> script-level package that provides a decent implementation of sheets by
> animating a frame via repeated calls to "place," but it doesn't look
> quite right--there's no drop shadow on it, so I have to set the right
> type of relief on the widget. However, if I can't get custom sheets
> working, then I'll go with the script-level package.

Update:

Some good progress, the issue isn't with my C-level code, it's correctly
managing the drawing and window geometry of the window when the sheet is
drawn. There isn't a perfect correlation between Tk's window-mapping
functions and animating the sheet, i.e. I can't just run the "sheet"
command and have the sheet automagically draw in the correct position.
When I release this as open source, I'll either have to include some
script-level routines for drawing the window with correct placement or,
at the very least, some documentation. Still, I'm pleased that this is
moving forward.

--Kevin
--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Native custom sheets in Tk-Cocoa

2009-11-25T07:48:50Z

I'm trying to implement an extension that draws custom sheets in
Tk-Cocoa, so that a custom dialog or window can slide down from the top
of the window, as they do with tk_messageBoxes that have a "-parent"
flag set.

I'm making some progress, but the outcome isn't what I expect. I can get
the sheet to draw, but instead of animating, it completely overlays its
parent window, and then blocks the application. Also, only the topmost
widget in the sheet is displayed, i.e. a frame; its child widgets,
including the button to close the sheet, are not drawn.

It would be nice to get this working natively. I've actually developed a
script-level package that provides a decent implementation of sheets by
animating a frame via repeated calls to "place," but it doesn't look
quite right--there's no drop shadow on it, so I have to set the right
type of relief on the widget. However, if I can't get custom sheets
working, then I'll go with the script-level package.

My code is below, and advice is appreciated. --Kevin

Objective-C code:

//run the sheet
int RunTkSheet(ClientData clientData, Tcl_Interp *ip,
int objc, Tcl_Obj *CONST objv[]) {
if (objc != 3) {
Tcl_WrongNumArgs(ip, 1, objv, "parent? sheet?");
return TCL_ERROR;
}

//get handle on parent Cocoa window from Tk

Tk_Window parentpath = Tk_NameToWindow(ip, Tcl_GetString(objv[1]),
Tk_MainWindow(ip));

if (parentpath == NULL) {
return TCL_ERROR;
}

Drawable parent_d = Tk_WindowId(parentpath);
NSView *parentview = TkMacOSXGetRootControl(parent_d);
NSWindow *parent = [parentview window];

//get handle on sheet Cocoa window from Tk

Tk_Window sheetpath = Tk_NameToWindow(ip, Tcl_GetString(objv[2]),
Tk_MainWindow(ip));

if (sheetpath == NULL) {
return TCL_ERROR;
}

Tk_MakeWindowExist(sheetpath);
Tk_MapWindow(sheetpath);

Drawable sheet_d = Tk_WindowId(sheetpath);
NSView *sheetview = TkMacOSXGetRootControl(sheet_d);
NSWindow *sheet = [sheetview window];
if (sheet == nil) {
return TCL_ERROR;
}

//display the sheet
[NSApp beginSheet:sheet
modalForWindow:parent
modalDelegate:nil
didEndSelector:NULL
contextInfo:nil];

NSLog(@"sheet drawn");

return TCL_OK;

}

//run the sheet
int HideTkSheet(ClientData clientData, Tcl_Interp *ip,
int objc, Tcl_Obj *CONST objv[]) {
if (objc != 2) {
Tcl_WrongNumArgs(ip, 1, objv, "sheet?");
return TCL_ERROR;
}

//get handle on sheet Cocoa window from Tk
Tk_Window sheetpath = Tk_NameToWindow(ip, Tcl_GetString(objv[1]),
Tk_MainWindow(ip));

if (sheetpath == NULL) {
return TCL_ERROR;
}

Drawable sheet_d = Tk_WindowId(sheetpath);
NSView *sheetview = TkMacOSXGetRootControl(sheet_d);
NSWindow *sheet = [sheetview window];

//hide the sheet
[NSApp endSheet:sheet];
[sheet orderOut:nil];

NSLog(@"sheet hidden");

//clean up
Tk_DestroyWindow(sheetpath);

return TCL_OK;

}

Here's the test code:

package require macsheet

button .b -text "Run Sheet" -command sheetf
pack .b

proc sheetf {} {
frame .f -bg blue
label .f.l -bg red -text "Sheet"
pack .f.l -fill both -expand yes
button .f.b -text "Close Sheet" -command [list macsheet::hidesheet .f]
pack .f.b

macsheet::runsheet . .f

}

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: Multi-column menus in Cocoa Tk

2009-11-18T20:45:02Z

On Wed, Nov 18, 2009 at 20:20, Tom Goddard <goddard@...> wrote:
> Are multi-column menus and colored backgrounds for menu entries
> supported in Cocoa Aqua Tk (8.5.8 backport or 8.6b1)?

no, only features directly supported by NSMenuItem (images, colored
text foreground, fonts etc) are supported. Anything else would require
a custom NSView in the NSMenuItem:
http://developer.apple.com/mac/library/documentation/Cocoa/Conceptual/MenuList/Articles/ViewsInMenuItems.htm
it might be worth investigating whether Tk could provide a facility to
allow extensions to specify such custom views...

Cheers,

Daniel

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Multi-column menus in Cocoa Tk

2009-11-18T20:20:27Z

Are multi-column menus and colored backgrounds for menu entries
supported in Cocoa Aqua Tk (8.5.8 backport or 8.6b1)? I have tried with
the 8.5.8 backport of Cocoa Aqua Tk but neither of these features work.
Both features do work in the Carbon Aqua Tk in 8.5.6 if the following
magic is used before creating the menus

set ::tk::mac::useCustomMDEF 1

Thanks.

Tom Goddard
UCSF Chimera molecular graphics developer

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: NSDragging protocol/"sender" and Tk_Window

2009-11-18T18:49:34Z

On 11/18/09 12:02 AM, Kevin Walzer wrote:

>
> Based on what I'm observing with "puts" and other debugging statements,
> it appears that registering drag types always works, but when the widget
> isn't accepting drops, the drop events aren't "firing." This may be
> getting into Cocoa/Tk event loop integration; I really can't figure out
> why this stuff works in certain contexts and not others.

Further progress to report...

I have gotten a sourced script to work. I can register a toplevel window
as a drag target, bind enter, leave and drop events to the window, and
get output from the Tk widget. That's the basic foundation I need. I
haven't yet figured out how to obtain the dragged data from the
clipboard to do something with it, but that will come.

It appears that only a toplevel can be registered as a drop target.
Calling the Cocoa methods on child widgets doesn't work, for some
reason. So I will most likely be implementing Daniel's suggestion to
base the drag target on a toplevel window and then implement some
cursor-tracking logic for specific callbacks.

One thing I will not be doing is making Tk widgets themselves drag
sources, i.e. dragging text from a Tk text widget to another app. While
I've made some progress, I've run into several conflicts. For instance,
the Cocoa API's to enable dragging of text conflict with the Tk API's
for selecting text. If I register a text widget as drag/drop enabled,
<B1-Motion> both selects the text and displays a drag icon, as if I were
dragging the text to another widget. I don't know how to resolve this
conflict, i.e. tell Tk the difference between dragging the mouse to
select the text and dragging the mouse to drag the text. I think this
may involve too much mucking around with Tk internals to get right. As a
result, I won't implement this feature.

Given I'm making progress, I'll hold off on posting some code to play
with until it's further along.

--Kevin

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: NSDragging protocol/"sender" and Tk_Window

2009-11-17T21:02:37Z

On 11/17/09 8:19 AM, Kevin Walzer wrote:

> Is there anything that could account for the difference between the
> behavior here? I've never seen a case where commands in an interactive
> session and a sourced script produced such different behavior.

Linus Nyberg suggested, off-list, that the issue might be that running
the commands interactively in Terminal causes the event-loop to update,
hence making the widget a valid drop target that responds to drags. He
suggested adding "update" commands to the full script that Wish is
sourcing.

That didn't work, at least not in Terminal. But sourcing the script in
Wish's built-in console, and running the commands interactively there,
did work as expected both times.

On yet another angle, saving the script as "AppMain.tcl" and launching
it from a standalone build of Wish doesn't work either (the window
doesn't respond to dropped files after being registered for drag types).

Based on what I'm observing with "puts" and other debugging statements,
it appears that registering drag types always works, but when the widget
isn't accepting drops, the drop events aren't "firing." This may be
getting into Cocoa/Tk event loop integration; I really can't figure out
why this stuff works in certain contexts and not others.

In the next day or so I'll clean up my code and post it for others to
build and hack on, so perhaps another set of eyes can help here...

--Kevin

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: NSDragging protocol/"sender" and Tk_Window

2009-11-17T05:19:40Z

On 11/16/09 9:31 PM, Kevin Walzer wrote:

>
> I've gotten a Tk window to respond to drags of files, URL's and strings
> by printing a message to stdout. I've also been able to generate a
> virtual event for when the drag area is entered. I haven't gotten the
> cursor to change yet, but that may not be a crucial thing.

Some additional notes:

Typing these commands in an interactive session of Wish in Terminal
produces the expected drag/drop behavior:

package require MacDND

pack [label .f -text "Foo" -bg red] -fill both -expand yes

::macdnd::registerdragwidget .f

The .f label accepts the drag. (I can tell this because the dragged
image disappears when I drop it over the widget; otherwise it would snap
back to its original location.)

Putting the same commands into a script, "drag.tcl," which is then
sourced by Wish, does not appear to implement the drag/drop behavior.
The drag image snaps back to its original location.

Is there anything that could account for the difference between the
behavior here? I've never seen a case where commands in an interactive
session and a sourced script produced such different behavior.

--Kevin

--
Kevin Walzer
Code by Kevin
http://www.codebykevin.com

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac

Re: NSDragging protocol/"sender" and Tk_Window

2009-11-16T20:21:50Z

Kevin:

I suggested to Daniel that a function similar to tk::mac::opendocument
would be sufficient for drag and drop.

in this way anything that is dragged goes to the defined proc and the
tcl programmer then handles the details.

i know for certain that it would be a great singular improvement in tk
for the mac and would suffice for all of my needs.

im not much of a cocoa programmer but if you followed tgat route for
an initial release it may make your life easier and provide a grealy
appreciated and much needed stopgap.

thanks.

Sent from my iPhone

On Nov 16, 2009, at 6:31 PM, Kevin Walzer <kw@...> wrote:

> Hi Daniel,
>
> On 11/16/09 7:16 PM, Kevin Walzer wrote:
>
>>
>> In any event, I will look into the subview idea and adding this to
>> specific widgets. If I can get this working, then that may solve my
>> problem.
>>
>
> By way of follow-up, I'm happy to report some progress.
>
> I've gotten a Tk window to respond to drags of files, URL's and
> strings
> by printing a message to stdout. I've also been able to generate a
> virtual event for when the drag area is entered. I haven't gotten the
> cursor to change yet, but that may not be a crucial thing.
>
> Your suggestion on adding a subview proved to be very helpful. I'm
> still working out the details of the subview. For instance, when I
> register two separate child widgets of a toplevel as drag widgets, the
> second widget seems to accept the drags, but the first widget no
> longer
> does.
>
> I've also gotten this to work by using two functions that are probably
> no-no's: TkWindow and TkMacOSXGetTkWindow. I pulled
> TkMacOSXGetTkWindow from its original file and re-implemented it in my
> own: this is a helpful function for getting the corresponding Tk
> window
> for an NSWindow.
>
> I understand that TkWindow is also a private function, but you used it
> in the tkwebview extension, and it seems especially useful here.
>
> At the very least, I'm happy to be finally making some real
> progress, so
> thanks again for the suggestions. I still have a ways to go, but we
> are
> finally getting somewhere.
>
> --Kevin
> --
> Kevin Walzer
> Code by Kevin
> http://www.codebykevin.com
>
> ---
> ---
> ---
> ---------------------------------------------------------------------
> Let Crystal Reports handle the reporting - Free Crystal Reports 2008
> 30-Day
> trial. Simplify your report design, integration and deployment - and
> focus on
> what you do best, core application coding. Discover what's new with
> Crystal Reports now. http://p.sf.net/sfu/bobj-july
> _______________________________________________
> Tcl-mac mailing list
> tcl-mac@...
> https://lists.sourceforge.net/lists/listinfo/tcl-mac

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
Tcl-mac mailing list
tcl-mac@...
https://lists.sourceforge.net/lists/listinfo/tcl-mac