Devart Unidac 7411 Professional For Rad Studio 103 Rio «VALIDATED - 2027»

procedure TForm1.SwitchProvider(Provider: string); begin UniConnection.Connected := False; UniConnection.ProviderName := Provider; case Provider of 'SQL Server': UniConnection.SpecificOptions.Values['Server'] := 'localhost'; 'Oracle': UniConnection.SpecificOptions.Values['Direct'] := 'True'; 'PostgreSQL': UniConnection.SpecificOptions.Values['UseUnicode'] := 'True'; end; UniConnection.Connect; end;