[MSEide-MSEgui-talk] Error compiling MSE

2015-12-21 Thread Julio Jiménez 
Hi Martin.

May be you are in the middle of a change. I get errors compiling mse with
FPC 3.0.1

Writing Resource String Table file: ibase60dyn.rsj
Compiling ./lib/common/db/msefbservice.pas
msefbservice.pas(747,75) Error: Incompatible types: got "ShortInt" expected
"pisc_resv_handle"
msefbservice.pas(1281) Fatal: There were 1 errors compiling module, stopping
Fatal: Compilation aborted


I see you are implementing firebird services :)

Regards.

-- 
Julio Jiménez Borreguero
--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] Reference TFrame - need input

2015-12-21 Thread Michael Ebner 

Am 20.12.2015, 14:39 Uhr, schrieb Martin Schreiber :


On Sunday 20 December 2015 09:51:57 Michael Ebner wrote:

Need input: When assigning the Picture in the ObjectInspector, masking
works, if using Face.Image.Source, mask will be ignored.


Works for me, please send a simple testproject (*.pas, *.mfm and *.prj  
files)

which shows the problem as compressed archive as attachment to this list.


See attachement, the difference isn't designtime or runtime, the  
difference is


  Button3.Face.Image.Source := BitmapComp1; // no masking
...
  Button4.Face.Image.Assign(BitmapComp1.Bitmap);// masking


By the way: Needs Button1.CreateFace a check for Face created yet?


Best regards

Michael


--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk



--
TABU Datentechnik
Michael Ebner
Albert-Schweitzer-Straße 23
72116 Mössingen
i...@tabu-datentechnik.de
0700 / 326 377 01

MaskingIssue.7z
Description: Binary data
--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] Error compiling MSE

2015-12-21 Thread Martin Schreiber 
On Monday 21 December 2015 20:18:13 Julio Jiménez wrote:
> Hi Martin.
>
> May be you are in the middle of a change. I get errors compiling mse with
> FPC 3.0.1
>
> Writing Resource String Table file: ibase60dyn.rsj
> Compiling ./lib/common/db/msefbservice.pas
> msefbservice.pas(747,75) Error: Incompatible types: got "ShortInt" expected
> "pisc_resv_handle"
> msefbservice.pas(1281) Fatal: There were 1 errors compiling module,
> stopping Fatal: Compilation aborted
>
Works for me. Which OS, which FPC?

Martin

--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] Error compiling MSE

2015-12-21 Thread Martin Schreiber 
On Tuesday 22 December 2015 06:41:03 Martin Schreiber wrote:
> On Monday 21 December 2015 20:18:13 Julio Jiménez wrote:
> > Hi Martin.
> >
> > May be you are in the middle of a change. I get errors compiling mse with
> > FPC 3.0.1
> >
> > Writing Resource String Table file: ibase60dyn.rsj
> > Compiling ./lib/common/db/msefbservice.pas
> > msefbservice.pas(747,75) Error: Incompatible types: got "ShortInt"
> > expected "pisc_resv_handle"
> > msefbservice.pas(1281) Fatal: There were 1 errors compiling module,
> > stopping Fatal: Compilation aborted
>
> Works for me. Which OS, which FPC?
>
I see, FPC 3.0.1, sorry. Works for me with 3.0.1.

Martin



--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] Reference TFrame - need input

2015-12-21 Thread Martin Schreiber 
On Monday 21 December 2015 11:36:50 Michael Ebner wrote:
> Am 20.12.2015, 14:39 Uhr, schrieb Martin Schreiber :
>
> See attachement, the difference isn't designtime or runtime, the
> difference is
>
>Button3.Face.Image.Source := BitmapComp1; // no masking
> ...
>Button4.Face.Image.Assign(BitmapComp1.Bitmap);// masking
>
Correct, if a tmaskedbitmap.source is set the bitmap uses the remote bitmap 
with its possible mask for painting, the local mask_source is not used.
"Button4.Face.Image.Assign()" creates a local copy.

Another option is to set the mask in the remote bitmap:
"
 bitmapcomp1.bitmap.mask_source:= bitmapcomp2;
"
>
> By the way: Needs Button1.CreateFace a check for Face created yet?
>
No.

Could you test if ow1_autowidth with fs_italic font style is OK now?

Martin

--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] Reference TFrame - need input

2015-12-21 Thread Martin Schreiber 
On Monday 21 December 2015 11:36:50 Michael Ebner wrote:
>
> See attachement, the difference isn't designtime or runtime, the
> difference is
>
>Button3.Face.Image.Source := BitmapComp1; // no masking
> ...
>Button4.Face.Image.Assign(BitmapComp1.Bitmap);// masking
>
Please try again with git master 972edfc1fe2b4b6a65d60014e2d5c44e8c20bd71,
it uses the local mask if available if mask_source is set.

A tip: Instead to place a tlabel one could use Button1.frame.caption.

Martin

--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] iassistiveclientgrid and cek_enter ?

2015-12-21 Thread Fred van Stappen 
> Please use sender.getassistivehint() instead. The interface iassistiveclient 
> ("sender") should provide all you need.

=>  if (Sender is ttoolbar) then
   Result := 'tool bar, ' + Sender.getassistivehint()

=> error => sak_mse.pas(535,39) Error: identifier idents no member 
"getassistivehint"
_

PS: => if (Sender is ttoolbar) then
Result := 'tool bar, ' + ttoolbar(Sender).getassistivehint()

  => works like charm.

Fre;D
 
  --
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] iassistiveclientgrid and cek_enter ?

2015-12-21 Thread Martin Schreiber 
On Monday 21 December 2015 17:30:49 Fred van Stappen wrote:
> > Please use sender.getassistivehint() instead. The interface
> > iassistiveclient ("sender") should provide all you need.
>
> =>  if (Sender is ttoolbar) then
>Result := 'tool bar, ' + Sender.getassistivehint()
>
> => error => sak_mse.pas(535,39) Error: identifier idents no member
> "getassistivehint" _
>
That works in assistivemonitor:
"
procedure tmainfo.showvalues(const sender: iassistiveclient);
var
 dataintf: iifidatalink;
 valueprop: ppropinfo;
 flags: assistiveflagsty;
 rea1: real;
begin
 flags:= sender.getassistiveflags();
 assistivename.value:= sender.getassistivename();
 assistivecaption.value:= sender.getassistivecaption();
 assistivetext.value:= sender.getassistivetext();
 assistivehint.value:= sender.getassistivehint();
 assistivecaretindex.value:= sender.getassistivecaretindex();
...
procedure tassistivemonitor.doitementer(const sender: iassistiveclient;
   const items: shapeinfoarty; const aindex: integer);
begin
 mainfo.showvalues(sender);
 track('',sender,inttostrmse(aindex));
end;
"
Please show more code.

Martin

--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] iassistiveclientgrid and cek_enter ?

2015-12-21 Thread Fred van Stappen 
> > > Can't you use iassistiveserver.doitementer()?
> >
> > For Ttoolbar? No, I did not try it.
> > I will try it asap.

Hello Martin.

For TToolbar I have lot of luck with tcustomtoolbar.getassistivehint() ;-)

This is used successfully =>

if (Sender is ttoolbar) then
Result := 'tool bar, ' + ttoolbar(Sender).getassistivehint()

But with last MSE commit there is that error while compiling.

=> error => "no indent for getassistivehint()"

The trick was to:

=> transfered from "protected" => to "public" and it works. ;-)

But maybe there was a reason to make getassistivehint() protected...

PS: Problem to retrieve special key (like "Enter", "left", "F10", "Shift", ...) 
in TWidgetGrid solved. ;-)

Thanks.

Fre;D

  --
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

Re: [MSEide-MSEgui-talk] iassistiveclientgrid and cek_enter ?

2015-12-21 Thread Martin Schreiber 
On Monday 21 December 2015 17:08:43 Fred van Stappen wrote:
> > > > Can't you use iassistiveserver.doitementer()?
> > >
> > > For Ttoolbar? No, I did not try it.
> > > I will try it asap.
>
> Hello Martin.
>
> For TToolbar I have lot of luck with tcustomtoolbar.getassistivehint() ;-)
>
> This is used successfully =>
>
> if (Sender is ttoolbar) then
> Result := 'tool bar, ' + ttoolbar(Sender).getassistivehint()
>
Please use sender.getassistivehint() instead. The interface iassistiveclient 
("sender") should provide all you need.

Martin

--
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk