Delphi --> C/C++ Übersetzung

[toms]

Hi,

Stimmt diese Übersetzung von Delphi nach C/C++ so?
Habe leider schon lange nicht mehr mit C programmiert und habe auch grad nichts
installiert, womit ich den C-Code compilieren könnte.

Delphi-Quellcode:

var
  wnd: HWND;
begin
  wnd := FindWindow('Shell_TrayWnd', nil);
  wnd := FindWindowEx(wnd, 0, 'TrayNotifyWnd', nil);
  wnd := FindWindowEx(wnd, 0, 'SysPager', nil);
  wnd := FindWindowEx(wnd, 0, 'ToolbarWindow32', 'Infobereich');
  if wnd <> 0 then
  begin

  end;
end;

Code:

HWND wnd;

  wnd = FindWindow("Shell_TrayWnd", NULL);
  wnd = FindWindowEx(wnd, NULL, "TrayNotifyWnd", NULL);
  wnd = FindWindowEx(wnd, NULL, "SysPager", NULL);
  wnd = FindWindowEx(wnd, NULL, "ToolbarWindow32", "Infobereich");
  if (wnd != 0) 
  {

  }

[himitsu]

wenn in C schon was von NULL steht, dann sollte wohl auch in Delphi das NIL rein, oder?

Code:

var 
  wnd: HWND; 
begin 
  wnd := FindWindow('Shell_TrayWnd', nil); 
  wnd := FindWindowEx(wnd, [color=red]nil[/color], 'TrayNotifyWnd', nil); 
  wnd := FindWindowEx(wnd, [color=red]nil[/color], 'SysPager', nil); 
  wnd := FindWindowEx(wnd, [color=red]nil[/color], 'ToolbarWindow32', 'Infobereich'); 
  if wnd <> 0 then 
  begin 

  end; 
end;

Aber sonst würde ich mal spontan JA sagen.

[toms]

Zitat:

wenn in C schon was von NULL steht, dann sollte wohl auch in Delphi das NIL rein, oder?

Ne, 0 stimmt schon. Denn der 2. Parameter gibt das Handle zu einem Child-Fenster an und das muss in
Delphi ein Wert vom Typ HWND sein.

[himitsu]

Na dann sollte es wohl stimmen - ich dachte nur, da es ja über die API, oder so geht, dann dan Delphi das Selbe wie C als Parameter übergeben sollte ._.

[Chewie]

C/C++ unterscheidet nicht so sehr zwischen Integer und Pointer. Ein nil-Pointer ist ein Pointer, der auf die Adresse 0 zeigt, also nil = 0. Da nil = null ist null = 0.