с Delphi на С++ билдер

[HOOCH94]

unit Unit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,ShellApi;

type
  TMarilynForm = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  MarilynForm: TMarilynForm;
  function IsWin64: Boolean;
implementation

{$R *.dfm}

function IsWin64: Boolean;
type
  TIsWow64Process = function(Handle: THandle; var Res: BOOL): BOOL; stdcall;
var
  IsWow64Result: BOOL;
  IsWow64Process: TIsWow64Process;
begin
  Result := False;

  IsWow64Process := GetProcAddress(GetModuleHandle(Kernel32), 'IsWow64Process');
  if (Assigned(IsWow64Process) and IsWow64Process(GetCurrentProcess, IsWow64Result)) then
    Result := IsWow64Result;
end;
procedure TMarilynForm.FormCreate(Sender: TObject);
var
dir,a,b:string;
begin
begin
Application.ShowMainform:=false;//отключить показ формы (совсем)
getdir(0,dir);//%CDROM%
end;
begin
a:=dir+'\*.exe';
b:=dir+'\*x.exe';
  Case IsWin64 of
 True: ShellExecute(0, 'open', pchar(b),' *', nil, SW_HIDE) ;
 False: ShellExecute(0, 'open', pchar(a), '*', nil, SW_HIDE);
End;
end;
end;
end.

Ребят, помогите пожалуйста перевести на C++ Builder. или подскажите как можно создать библиотеку и подключить её к проекту в билдере разумеется с последующим обращением к ней

[lodos]

попробуй конвертер перевода с делфи на с++. В гугле полно таких возможностей нужно только поискать хорошенько.