[Gambas-devel] Aktivating editor-windows in IDE

Benoit Minisini gambas at ...1...
Wed Dec 27 15:15:22 CET 2006


On Wednesday 27 December 2006 15:13, Charlie Reinl wrote:
> Am Mittwoch, den 27.12.2006, 14:46 +0100 schrieb Benoit Minisini:
> > On Wednesday 27 December 2006 13:36, you wrote:
> > > Am Mittwoch, den 27.12.2006, 11:42 +0100 schrieb Benoit Minisini:
> > > > On Wednesday 27 December 2006 00:07, Charlie Reinl wrote:
> > > > > Salut Benoît,
> > > > >
> > > > > what I wana to is, to unset/set  Breakpoints from
> > > > > FDebugInfo.lstBreak by a dblclick.
> > > > >
> > > > > In my testing IDE that works fine.
> > > > >
> > > > > My problem is to switch back to the editor-windows, which where
> > > > > open when I dblclicked.
> > > > >
> > > > > FDebugInfo.lstBreak is a ColumnView in my IDE/FDebugInfo.form now.
> > > > >
> > > > >   sLastLine = lstStack[0].Text
> > > > >
> > > > > --- some code to set/unset the breakpoint, which works
> > > > >
> > > > >     xArgs = Scan(sLastLine, "*.*.*")
> > > > >     hWin = Project.OpenFile(Project.FindPath(CStr(xArgs[0])),
> > > > > CInt(xArgs[2]))
> > > > >
> > > > > switchs back to that editor-window,
> > > > > but the editor-window is grey (not enabled) and the only way I
> > > > > found, was to set the ReadOnly of that editor-window to TRUE.
> > > > > But that cause problems, I can't close that project no more after.
> > > > >
> > > > > Do you have any hint for me ?
> > > > >
> > > > > Amicalment
> > > > > Charlie
> > > >
> > > > Some points:
> > > >
> > > > - Maybe the '.debug' settings file should be renamed as '.settings',
> > > > because we may store non debugging related settings in it in the
> > > > future.
> > >
> > > OK. should I make it ? so I can also rename ClearBkp to
> > > ClearBreakpoints.
> > > But If you want, you also can do it ?
> >
> > I will do it. I'm working on redesigning breakpoint management...
> >
> > Regards,
>
> I found a Bug in FDebugInfo.class I made
>
> at :
>
>  PUBLIC SUB cvwWatch_Activate()
>
> -  DIM sText AS String = cvwObject.Item.Text  (BUG)
> +  DIM sText AS String = cvwWatch.Item.Text
>
>    IF Right(sText) = ":" THEN RETURN
>    Design.Command("#X" & sText & "\t" & sText)
>
> did you start or can I commit it.
>
> Amicalment
> Charlie
>

You can commit. I will solve conflicts later.

-- 
Benoit Minisini





More information about the Devel mailing list