NEXUS MIDDLEWARE

[ONiX]

(C) 2026 by Brain Patchwork DX, LLC.

Screenshot 2026-05-05 000031.png (44.34 KiB) Viewed 1568 times

Nexus Server Side Connector Code:

Code: Select all

var DB: TDatabase;
begin
  DB := TDatabase.Create('Access', 'database.mdb'); <--- The Magic that makes it seamless!
  DB.OpenTable('Customers');
  DB.Seek(CustomerID);
  ShowName(DB.GetField('Name'));
end;

{A remote tier} Next Client Side Connector Code:

Code: Select all

var Client: TNexusClient;
begin
  Client := TNexusClient.Create('localhost', 2874);
  Client.Login('user', 'password');
  Client.OpenDataSet('SELECT * FROM Orders');
  while not Client.EOF do
  begin
    ProcessOrder(Client.GetField('OrderID'));
    Client.Next;
  end;
end;

[ONiX]

(C) 2026 by Brain Patchwork DX, LLC.

Screenshot 2026-05-05 001652.png (96.28 KiB) Viewed 1540 times