PLZ und Bundesland in DLL hinterlegt

[Kunoishi]

Ich habe hier mal eine neue Frage

Meine Idee ist es die PLZ und dazugehöriges Bundesland in einer bzw. zwei DLL’s zu hinterlegen (plz.dll, bund.dll) dazu habe ich in jeder dll eine ComboBox mit den Postleitzahlen und in der anderen dll das gleiche mit den Bundesländern gemacht.
Nun wollte ich in meinem Projekt zwei Editfelder haben wo ich die PLZ als Beispiel eingebe und er aus der bund.dll mir dann das dazugehörige Bundesland holt und in dem anderen Editfeld aus meinem Projekt dort übergibt.

Frage stellt sich nur wie ich in dem Projekt die Dll’s anspreche damit diese den Wert in das jeweilige Editfeld übergeben.
Und wie schaffe ich es, dass er die PLZ den Bundesländern richtig zuordnet wenn ich diese getrennt in den jeweiligen Dll’s lasse.

Grundidee war:

Delphi-Quellcode:

library Formdll;

uses
  dialogs,
  sysutils,
  PLZ in 'PLZ.pas' {PLZ},
  Bundesland in 'Bundesland.pas' {Bundesland};

procedure Fensteranzeigen;stdcall;
begin
  PLZ1:= TPLZ.create(nil);
  try
    PLZ1.showmodal;
  finally
    Plz1.Release; // .free;
  end
end;

procedure NewExit;
begin
  showMessage('Exitprozedur der DLL');
  { DLL wird entladen }
end;

exports
       PLZ.
       Bundesland;

begin
   AddExitProc(NewExit);
   showmessage('DLL wird geladen ...');
end.

und dann die PLZ und die Bundesland

Delphi-Quellcode:

unit Bundesland;

interface

uses
  SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,
  Forms, Dialogs, StdCtrls;

type
  TBundesland = class(TForm)
    Button1: TButton;
    ComboBox1: TComboBox;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Bundesland1: TBundesland;

implementation

{$R *.DFM}

procedure TBundesland.Button1Click(Sender: TObject);
begin
  close
end;

end.

Delphi-Quellcode:

unit PLZ;

interface

uses
  SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,
  Forms, Dialogs, StdCtrls;

type
  TPLZ = class(TForm)
    Button1: TButton;
    ComboBox1: TComboBox;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  PLZ1: TPLZ;

implementation

{$R *.DFM}

procedure TPLZ.Button1Click(Sender: TObject);
begin
  close
end;

end.

ist der weg richtig oder ändet das wieder bevor es begonnen hat