Integrer du langage C dans delphi

Version imprimable

25/04/2009, 13h16
jean-tristan

Integrer du langage C dans delphi

Bonjour,
je travaille sur une application delphi et je me pose plusieurs questions :
Est-il possible d'intégrer du code C dans du delphi?
Est ce que cela va augmenter la rapidité de la tache de le coder en C de l'intégrer au code delphi, plutôt que de le coder en delphi?
Comment intégrer du code C dans du Delphi?
Je vous remercie de vos réponses.
25/04/2009, 13h25
Cl@udius

Salut et bienvenue :D

Citation:

Envoyé par jean-tristan

Est-il possible d'intégrer du code C dans du delphi?

Malheureusement la réponse est non. Sous Delphi on code en Delphi/Pascal. Tout code C/C++ devra être traduit dans ce langage.

@+ Claudius
25/04/2009, 13h44
jean-tristan

si le langage C est traduit en delphi, cela n'apporte aucune amélioration dans la rapidité de l'application??
Dans ce cas existe-t-il des moyens d'optimisation autre algorithmiquement (comparabla au -o3 du C)??
Aussi je souhaiterai savoir si le delphi est lent par rapport au C, Java C++?
Existe-il des outils de profilage?
Dans le delphi quelle chose sont à éviter pour eviter de perdre du temps
Merci de vos réponse
25/04/2009, 13h49
tourlourou

le C n'est pas forcément plus rapide... le compilo de Delphi est très performant, et quand on cherche à gagner en vitesse en codant une routine en assembleur, il n'est pas rare de faire plus lent !
25/04/2009, 13h50
Cl@udius

Je ne suis pas un spécialiste du C/C++ mais dans l'absolu ça ne devrait pas changer grand chose.
@+

[edit] Grilled
25/04/2009, 14h34
exoseven

tu dois pouvoir linker les .obj d'une compilation C après la vitesse sauf cas spécifique pas sur que tu gagnes beaucoup
28/04/2009, 09h26
peter27x

Un .exe qu'il ait été fait en C ou en Delphi ça reste un .exe en langage "bas niveau" non ?

Donc pourquoi ça irait plus vite pour l'un ?
28/04/2009, 09h58
chaplin

Quel est la taille du code en C ?

Citation:

Quel est la taille du code en C ?

Sous delphi aussi on peut creer des fichier de quleque kilos
http://www.developpez.net/forums/d84...ir-delphi-cpp/

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
program Project1;
uses Windows;
{$R *.res}
const WM_DESTROY = $0002;
var Msg: TMSG;
    wClass: TWndClass;
    hInst, Handle: HWND;
function WindowProc(hWnd, Msg, wParam, lParam: Longint): Longint; stdcall;
begin
  Result:= DefWindowProc(hWnd, Msg, wParam, lParam);
  if (Msg = WM_DESTROY) then
  begin
    UnRegisterClass('myClass', hInst);
    ExitProcess(hInst);
  end;
end;
 
begin
  hInst:= GetModuleHandle(nil);
  with wClass do
  begin
    Style:= CS_PARENTDC;
    hIcon:= LoadIcon(hInst, 'MAINICON');
    lpfnWndProc:= @WindowProc;
    hInstance:= hInst;
    hbrBackground:= COLOR_BTNFACE+1;
    lpszClassName:= 'myClass';
    hCursor:= 0;
  end;
  RegisterClass(wClass);
  Handle:= CreateWindow('myClass', 'TEST', WS_CAPTION or WS_SYSMENU or WS_VISIBLE or WS_POPUP, 200, 200, 300, 200, 0, 0, hInst, nil);
  while GetMessage(Msg, Handle, 0, 0) do
  begin
    TranslateMessage(Msg);
    DispatchMessage(Msg);
  end;
end.