[lazarus] Patch win32: window owner, taskbar grouping

[Mattias Gaertner]

On Sat, 30 Aug 2003 18:13:51 +0200
Micha Nelissen <M.Nelissen at student.tue.nl> wrote:

> Micha Nelissen wrote:
> 
> > Hi,
> > 
> > Attached is a patch which makes windows stick together if one form own 
> > another. In the case of lazarus, when you click lazarus on taskbar, both
> > 
> > the object inspector and the source editor appear. Otherwise the object 
> > inspector is lost, because it does not have a button on the taskbar.
> 
> Maybe you shouldn't apply the second part of the patch: that's for 
> something else. Remove the begin and end, FParentWindow should always 
> have a value if a form is defined.

Applied. Thanks.


Mattias


> 
> Sorry about that,
> 
> Micha.
> 
> > @@ -2018,8 +2021,10 @@
> >          writeln('Exception occured creating window');
> >        end;
> >        If (FMainForm = Nil) And (Application.MainForm = Nil) Then
> > +      begin
> >          FMainForm := TForm(Sender);
> >        FParentWindow := Window;
> > +      end;
> >        Assert(False, 'Trace:CreateComponent - Form Window Handle Value =
> >        $' + IntToHex(Window, 8)); Assert(False, 'Trace:Creating a Form -
> >        SetProp'); DoSubClass := false;
> 
> 
> _________________________________________________________________
>      To unsubscribe: mail lazarus-request at miraclec.com with
>                 "unsubscribe" as the Subject
>    archives at http://www.lazarus.freepascal.org/mailarchives


--