mORMot Open Source

oraclei

Member

Registered: 2016-06-06

Posts: 18

How to hide login prompt dialog for UniDAC on client side?

I use unidac, on the server side, I set as follow:

function CreateConnection(dbConfig: TDatabaseConfig): TSQLDBUniDACConnectionProperties;
begin
    Result := TSQLDBUniDACConnectionProperties.Create('MySQL',dbConfig.Name, dbConfig.Username,dbConfig.Password );
    Result.SpecificOptions.Values['Server'] := dbConfig.Address;
    Result.SpecificOptions.Values['Port'] := IntToStr(dbConfig.Port);
    (Result.MainConnection as TSQLDBUniDACConnection).Database.LoginPrompt := false;
end;

So, there is not login prompt dialog when I run server, but it still popup login prompt dialog when I run client side, the code as follow:

fModel :=  TSQLModel.Create([TRoute,TTrip],RESTRestRootName);
fClient := TSQLHttpClientWinHTTP.Create(AppConfig.Server, AppConfig.Port, fModel);

How can I solve this ?   thanks!