[lazarus] Patch for LM_SHOWMODAL (Win32) and fix forTApplication.GetTitle

[Mattias Gaertner]

On Sat, 09 Aug 2003 11:18:23 -0300
Karl Brandt <pascalive at bol.com.br> wrote:

> I'm sending a patch that implements/fixes LM_SHOWMODAL in win32.
> 
> I also noticed a bug in TApplication.GetTitle:
> It was returning wrong values.
> To fix, just replace
>    Delete(Result, Length(Result) - Length(Ext) - 1, Length(Ext) + 1);
> with
>    Delete(Result, Length(Result) - (Length(Ext) - 1), Length(Ext));

Thanks. Applied.


Mattias