Forms and Handles

[12221]

Is there a way to get a pointer to a form if I know the forms handle?

 

[towerbase]

You can easily search through all the components owned by your application and compare the handle of each component with your handle.

For example, this function returns the form that corresponds to the handle passed as a parameter:

function TForm1.GetFormFromHandle(h: THandle): TForm;
var
  c: integer;
  f: TForm;
begin
  result := nil;
  for c := 0 to Application.ComponentCount - 1 do
    if Application.Components[c] is TForm then begin
      f := Application.Components[c] as TForm;
      if f.Handle = h then begin
        result := f;
        break;
      end;
    end;
end;

Andrew
Hampshire, UK

 

[12221]

Thx Towerbase. Yes this is the solution if the handle belongs to one of our applications components. But the issue is, that I want to get the pointer of a form in another process. The handle was retrieved by API call "EnumWindowsProc".

 

[brzdude]

As far as I know, if it is a handle for a window that belongs to another process, how do you know that this "process" was written in Delphi??
Once you step "outside" your application, you have to use whatever Windows provides (DLLs, Handles, Win32API, COM, DDE)