Ayuda de C#.Net a Delphi Win32

[mightydragonlor]

Hola a todos, lo que estoy intentando hacer es convertir código C#.Net a Delphi Win32, la siguiente es una conexion a una BD, no es para la misma base de datos, la de C# es para SQL Server 2005, para el caso de Delphi quiero conectarlo a Firebird a travez de los IBX.
C#
Conexion

public class Conexiones
{
public SqlConnection getconexion(string claveConexion)
{
string strConn = ConfigurationManager.ConnectionStrings[claveConexion].ToString();
SqlConnection conn = new SqlConnection(strConn);
conn.Open();
return conn;
}

}

ExecuteNonQuery

public class ExecuteNonQuery
{
public bool Actualizaciones(string Procedimiento, SqlParameter[] Parametros, SqlConnection Cn)
{
SqlCommand oCmd = new SqlCommand();
oCmd.CommandType = CommandType.StoredProcedure;
oCmd.CommandText = Procedimiento;
oCmd.Connection = Cn;
foreach (SqlParameter NumeroParametro in Parametros)
oCmd.Parameters.Add(NumeroParametro).Value = NumeroParametro.Value;
oCmd.ExecuteNonQuery();
return true;

}

Hasta ahora solo llevo esto en delphi, pero me encuentro un poco perdido, espero me puedan ayudar.

unit UnitData;

interface

Uses
Classes,
Controls,
Dialogs, {Cuadros dialogo}
DB,
IBStoredProc,
IBDatabase; {Base de Datos}

Type
TConector = Class
Public
function Conectar(Database: TIBDatabase; Transaction: TIBTransaction;Path: String;User: String;Password: String): Boolean;
End;

TExecuteNonQuery = Class
Public
function Actualizar(Procedimiento: TIBStoredProc;Nombre: String;Parametros: TParam;Database: TIBDatabase): Boolean;
End;

implementation


function TConector.Conectar(Database: TIBDatabase;Transaction: TIBTransaction;Path: string;User: string;Password: string): Boolean;
begin

With Database do
begin
DatabaseName := Path;
LoginPrompt := False;
Params.Clear;
Params.Add('user_name='+User);
Params.Add('password='+Password);
DefaultTransaction := Transaction;
Open;
end;

With Transaction do
begin
AutoStopAction := saRollBack;
DefaultAction := TACommit;
Active := true;
end;

end;

function TExecuteNonQuery.Actualizar(Procedimiento: TIBStoredProc; Nombre: string; Parametros: TParam; Database: TIBDatabase): Boolean;
begin
With Procedimiento do
begin
Database := Database;
StoredProcName := Nombre;
end;
end;

end.

[mightydragonlor]

AHHH!!
Me estoy volviendo loco, que alguien me guíe por favor, así sea solo una pequeña idea.

PD: Disculpas a todos por el grito.