Gets and languages

[Dietmar Jahnel]

In this sample when I right click for the copy/paste menu I get it
- in german (one line get)
- in english (multiline get)
why? how can I cange to german?
Thanks,
Dietmar



#include "Fivewin.ch"

FUNCTION MAIN()


DEFINE DIALOG copyDlg FROM 10, 20 TO 35, 90 TITLE "RIDA-Indexdokument kopierbar"

copyText = "Memo "

@0.5, 0.5 GET copyText of copyDlg;

@2, 2 GET copyText of copyDlg;
MEMO;
SIZE 100, 100;
READONLY;

@ 9.5, 20 BUTTON "&Beenden" OF copyDlg SIZE 40, 12;
ACTION ( copyDlg:End(), lOk := .t. ) DEFAULT


ACTIVATE DIALOG copyDlg CENTERED

RETURN NIL

[Taiwan]

Hello Dietmar,

Check your TGet and MGet source code for Right click.

Regards,

Richard

[Dietmar Jahnel]

That' what I did.

I couldn't find anything in these two classes.
I figured the code must be somewhere else - that's why I don't understand the difference in languages.

Dietmar

[Taiwan]

Check this in your source\CLASS

Code: Select all  Expand view

METHOD RButtonDown( nRow, nCol, nFlags ) CLASS TGet
METHOD RButtonDown( nRow, nCol, nFlags ) CLASS TMultiGet


Richard

[Dietmar Jahnel]

Your are right:

tGet invokes the default popup menu,
mGet has its own in english.

Thanks!
Diemtar

[Taiwan]

Your are right:

tGet invokes the default popup menu,
mGet has its own in english.

Thanks!
Diemtar

You're welcome.

Richard

[Horizon]

Thanks for info.

It has been 4 years since this message. I don't know why this class has not been changed ?

Regards,