abrir carpeta desde delphi no, con lazarus si

[danielmj]

hola, tengo una duda y un código, el código es este:

Código Delphi [-]
  if Join.CheckBox1.Checked then
    ShellExecute(Handle, 'open', nil, nil, PChar(extractFilePath(join.labEdit2.Text)), 1);

La duda es esta: ¿Por qué usando este código en lazarus me abre la carpeta indicada en el campo labEdit2.text y si la uso en delphi 2010 me devuelve este error? Decir que en el uses, tengo declarado "ShellApi".

[dcc64 Error] Unir.pas(181): E2003 Undeclared identifier: 'Handle'

La verdad es que cuando he visto que lazarus se lo traga y delphi no, me ha dejado descolocado. Seguramente tiene su razon de ser, pero se me escapa.
¿Alguna sugerencia?

Gracias y un saludo.

[danielmj]

Hola de nuevo,

vale he declarado el manejador en el var de la funcion como THandle y ya funciona.
una pregunta ¿por que si pongo...

Código Delphi [-]
if Join.CheckBox1.Checked then
    ShellExecute(Handle, 'open', nil, nil, PChar(extractFilePath(join.labEdit2.Text)), 1);

... sin declarar el manejador da error y si pongo "1" en lugar del "handle" no falla?

Saludos.

[jhonny]

Empezado por danielmj

Hola de nuevo,

vale he declarado el manejador en el var de la funcion como THandle y ya funciona.
una pregunta ¿por que si pongo...

Código Delphi [-]
if Join.CheckBox1.Checked then
    ShellExecute(Handle, 'open', nil, nil, PChar(extractFilePath(join.labEdit2.Text)), 1);

... sin declarar el manejador da error y si pongo "1" en lugar del "handle" no falla?

Saludos.

Normalmente uno envía el Handle del objeto TApplication, así...

Código Delphi [-]
ShellExecute(Application.Handle, 'open', nil, nil, PChar(extractFilePath(join.labEdit2.Text)), 1);

Con el 1 te funciona porque el compilador "cree" que le estas indicando como manejador el Handle con dirección 1.

[danielmj]

Empezado por jhonny

Normalmente uno envía el Handle del objeto TApplication, así...

Código Delphi [-]ShellExecute(Application.Handle, 'open', nil, nil, PChar(extractFilePath(join.labEdit2.Text)), 1);


Con el 1 te funciona porque el compilador "cree" que le estas indicando como manejador el Handle con dirección 1.

¿Qué seria la dirección 1? o dicho de otro modo ¿a que hace referencia el "1"? perdon por preguntar tanto.

Saludos.

[jhonny]

Empezado por danielmj

¿Qué seria la dirección 1? o dicho de otro modo ¿a que hace referencia el "1"? perdon por preguntar tanto.

Saludos.

Por acá encontré un Hilo donde Roman explica lo que preguntas... http://www.clubdelphi.com/foros/showthread.php?t=11567 espero te sirva .

[danielmj]

Gracias jhonny,

Pues a estudiar un poco la API de windows entonces, saludos.