[Dark_Code]

Empezado por escafandra

Código Delphi [-]
function GetWindowText(Handle: THANDLE): AnsiString;
var
  Buffer: array [0..255] of AnsiCHAR;
begin
  SendMessage(Handle, WM_GETTEXT, 255, Cardinal(@Buffer[0]));
  Result:= Buffer;
end;

Saludos.

En este caso como usaría la función ?, como haria para que me lea el edit de mi otro form ?

if hkexample= '1' then
        Pdword(Examen)^:= 456789456;
      end;

En ves de este valor "456789456" quiero que me lea el valor que agrego en mi edit que esta en mi form.