コードで書くとこんな感じです。

uses
  ..., DBXInterbase; 

procedure TForm1.Button1Click(Sender: TObject);
var
  DBXC: TSQLConnection;
  QRY: TSQLQuery;
  DataBase: String;
begin
  DBXC := TSQLConnection.Create(Self);
  try
    QRY := TSQLQuery.Create(Self);
    try
      DBXC.LoginPrompt     := False;
      DBXC.DriverName      := 'InterBase';
      DBXC.ConnectionName  := 'IBConnection';
      DBXC.GetDriverFunc   := 'getSQLDriverINTERBASE';
      DBXC.LibraryName     := 'dbxint.dll';
      DBXC.VendorLib       := 'gds32.dll';

      DBXC.Params.Clear;
      DBXC.Params.Values['user_name'    ] := 'SYSDBA';    // User Name
      DBXC.Params.Values['password'     ] := 'masterkey'; // Password
      DBXC.Params.Values['ServerCharSet'] := 'UTF8';      // CharSet
      DataBase := '127.0.0.1:' +
                  IncludeTrailingPathDelimiter(ExtractFilePath(ParamStr(0))) +
                  'DATA\DATA.IB';
      DBXC.Params.Values['DataBase'     ] := DataBase;    // Database

      QRY.SQLConnection := DBXC;
      DBXC.Connected := True;

      QRY.SQL.Clear;
      QRY.SQL.Add('Select * From MST_EMPLOYEE');
      QRY.SQL.Add('Where                     ');
      QRY.SQL.Add('  NAME = :_NAME           ');
      QRY.ParamByName('_NAME').AsString := Edit1.Text;
      QRY.Open;
      if QRY.IsEmpty then
        ShowMessage('Empty')
      else
        ShowMessage(IntToStr(QRY.FieldByName('CODE').AsInteger));
      QRY.Close;

      DBXC.Connected := False;
    finally
      QRY.Free;
    end;
  finally
    DBXC.Free;
  end;
end;  

　
See Also:
[Interbase (Delphi Forum)]
http://ht-deko.minim.ne.jp/delphiforum/?vasthtmlaction=viewtopic&t=882