German Umlaute with Lazarus

yep, Delphi wizard also is quite easy. look at this article

In the Wizzard i just see this.


Not this:

1st one - if you have installed DAD [client edition]
2nd one - if you have installed DAD, Server Edition.

I m not quit sure if this is in my Licence?
I have the Suite for all Platforms
I have this installed:

I don’t see
RemObjects Data Abstract - Server Library
RemObjects Data Abstract - Server IDE Package
+drivers packages

re-download and reinstall DAD server edition

I don’t see this in my Download, is this a special licence?

DAD Server Edition includes components for creating custom server.
“Simple” edition only have DAD client and Relativity.

Like i said i have the:

Items Ordered:
1x Suite for all Platforms — New User

I see this in my Downloads:

Elements (Oxygene, C# and Silver for all three platforms)
Fire
Data Abstract for .NET
Data Abstract for Cocoa
Data Abstract for Delphi
Data Abstract for Java
Data Abstract for JavaScript
Relativity Server - Developer
RemObjects SDK for .NET
RemObjects SDK for Cocoa
RemObjects SDK for Java
RemObjects SDK for Delphi
Hydra
Oxfuscator for .NET

Do i miss it or can i not build a DAD Server?

Manfred,

please email me at sales@remobjects.com so i can have a look at our account. With the Full Suite, you SHOULD have access to the server edition.

Hi again :wink:

1st one - if you have installed DAD [client edition]
2nd one - if you have installed DAD, Server Edition.

Since i have a Linux Serer running Ubuntu i use this Relativity Server until now:

RemObjects Relativity Server for Mono - 8.3.91.1167.zip [May 2015 Release] — Tue, May 26, 2015

Since this is the Mono Version, i am not quit sure with witch platform the new Server has to be developed…
Is it possible to get the Source of Relativity Server for Mono and adapt it or is it better to build it from scratch?

Can i Administrate the Custom Server with the Relativity Server Admin Tool?

You can try to create custom DAD server in FPC. Indy channels should work without any problem.
Relativity was created with .NET so delphi drivers like ZEOS can’t be used with it.

Thanks, logged as bugs://73397

bugs://73397 got closed with status fixed.

it will be in next beta (in a week)

Great news, thank you very much.

Hi
Did try the new Beta from Fri, Oct 23, 2015 and also the last Version ( Beta ).
I do not get the Umlaute.


Lazarus
with FPC 2.6.4 on 2015/10/26 at 16:53:16
using LCL 1.4.4.0 and Win32/Win64 widget set


RemObject
DA Ver.9.0.94.1191

weird, I’ve used this project:testcase.zip (128.3 KB)
both messages of Relativity (bin and json) was tested.

Hi Evgeny

I see that in your example you connect to the Server with
http://localhost:7099/json
Until now i used
http://localhost:7099/bin

I did try to connect with http://localhost:7099/json but failed. Do i have to change someting on the Realativity Server?
When i connect to the Server with the Server Admin this works:
http://localhost:7099/bin
But with json i always get a Error:
Login Failed

this is known bug and should be already fixed.

try to login to relativity before opening table.
in my sample, I use

  if not tbl_test31144_utf8.Active then begin
     RemoteDataAdapter.login;
  end;

It Seems that My App is freezing when i do a more than a few Selects…

This works:

procedure TDM.Setup_Dataset(Sender: TObject);
var
   sql_string_camp : String;
begin
    sql_string_camp :=      'SELECT * FROM CAMPS '+
                                    'WHERE ( REG_NO > 0)';

    with DM.RemoteDataAdapter do
    begin
         login;
         FillWithDASql(tbl_camps,sql_string_camp, nil);
    end;

    tbl_bible_art_list.IndexFieldNames := 'ART';
    DM.ApplyFilter(tbl_bible_art_list,'((C_NO = ''' + camp_ident_part + ''' OR C_NO = ''' + g_country  + ''') )','ART');
end;    

This works:

procedure TDM.check_user_access_rights(Sender: TObject);
begin
     RemoteDataAdapter.FillWithDASql(tbl_AccessRights,'SELECT description FROM AccessRights', nil);
     db_rights := tbl_AccessRights.FieldByName('description').AsString;
end;   

This Code does not Work / Did before without json:
I do not get any Error Message it just takes forever…

procedure TDM_member.setup_dataset(Sender: TObject);
var
   param_ar1, param_ar2 :DataParameterArray;
   par_ar1, par_ar2 :DataParameter;
begin
  param_ar1 := DataParameterArray.Create;
  par_ar1 := param_ar1.Add;
  par_ar1.Name := UTF8Encode('C_NO');
  par_ar1.Value := camp_ident_part;

  param_ar2 := DataParameterArray.Create;
  par_ar2 := param_ar2.Add;
  par_ar2.Name := UTF8Encode('C_NO');
  par_ar2.Value := camp_ident_part;

  begin
       dm.RemoteDataAdapter.login; // Aded just this Line
       dm.ApplyFilter(tbl_member,'((C_NO = ''' + camp_ident_part + ''') AND (STAT_DEL = 0))','F_NAME');
       dm.RemoteDataAdapter.FillWithDASql(
          [DM.tbl_camps,
           tbl_member],
           ['SELECT * FROM CAMPS '+
                      'WHERE (AREA_NO > 0)',
            'SELECT * FROM MEMBER '+
            '         WHERE (STAT_DEL = 0)'+
            '         ORDER BY F_NAME'],
          [param_ar1,
           param_ar2]);
  end;

  tbl_member.Open;
end;    

this is known bug and should be already fixed.
Is this Bugfix included in the new release on next Saturday?

Is there any advantage of json over bin?